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ABSTRACT 


In  recent  years,  traffic  conditions  in  urban  areas  have  been  experiencing 

a  gradual  deterioration.  In  order  to  provide  an  adequate  level  of  speed,  comfort, 

and  reliability  to  public  transportation,  some  transit  priority  schemes  have  to  be 

taken  into  consideration.  There  are  different  types  of  bus  priority  schemes,  and 

this  study  is  devoted  to  the  area  of  traffic  signal  priority  for  transit. 

In  the  literature  review  presented  in  Chapter  II,  the  different  signal 
priority  schemes  for  transit  are  examined.  Basically,  there  are  two  types  - 

active  and  passive.  The  active  approach  is  divided  into  two  subsets: 

1)  Unconditional  preemption,  and 

2)  Conditional  preemption. 

In  the  passive  approach,  there  are: 

1)  Signal  phase  for  buses  only, 

2)  Adjustment  of  cycle  length, 

3)  Splitting  of  phases, 

4)  Timing  plans,  and 

5)  Metering  of  vehicles. 

In  the  early  stages  of  this  study,  the  aim  was  to  investigate  the 

performance  of  different  transit  signal  priority  schemes  through  a  computer 
simulation  model,  BUSPAS,  and  to  recommend  the  best  signal  strategy  for 
transit  operation  in  Edmonton. 

A  transit  travel  time  survey  was  carried  out  in  Edmonton  on  107  Avenue 
from  101  Street  to  124  Street,  which  featured  a  set  of  traffic  actuated 

signalized  intersections  which  were  not  interconnected.  The  purpose  of  this 
survey  was  to  analyse  the  percentage  constituent  of  each  transit  travel  time 
component  and  to  provide  the  necessary  information  for  the  simulation  of  the 
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proposed  corridor  with  the  BUSPAS  program  later  on.  The  main  findings  were: 

1)  In  the  study  section,  total  stopped-time  delay  accounted  for  an 
average  of  about  39  percent  of  the  transit  travel  time. 

2)  The  delay  at  signals  was  a  major  component,  constituting  about 
17  percent  of  the  transit  travel  time  or  an  average  of  about  44 
percent  of  the  stopped-time  delay. 

3)  There  was  no  difference  between  the  running  speeds  of  the 
diesel  and  trolley  buses  at  a  95  percent  confidence  level. 

Due  to  some  difficulties  with  the  compatibility  of  computer  operating 
systems,  the  computer  program,  BUSPAS,  could  not  be  executed.  As  a  result 
the  initial  plan  of  testing  various  transit  priority  schemes  through  simulation 
could  not  be  carried  out  in  this  study.  At  this  writing,  the  BUSPAS  program  is 
operational  and  available. 

The  study  area  was  altered  to  an  investigation  of  the  transit  priority  in 
areawide  timing  plan.  The  new  objectives  were  to  compare  the  performance  of 
the  timing  plans  optimized  by  TRANSYT  for  cases  with  and  without  transit 
priority,  and  to  find  out  how  much  can  be  gained  by  giving  passive  priority  to 
transit  in  Edmonton. 

A  real-life  " before-and-after "  study  was  carried  out  on  Jasper  Avenue 
from  1  1  1  Street  to  117  Street.  The  " before "  signal  timing  was  derived  from 
TRANSYT,  in  which  bus  volume  was  combined  with  the  auto  traffic.  A  bus  was 
counted  as  the  equivalent  of  three  passenger  car  units.  The  "after"  signal  timing 
was  also  derived  from  TRANSYT,  except  that  buses  were  simulated  separately 
and  priority  was  given  to  them. 

The  main  conclusion  was  that  buses  did  not  gain  a  significant 
improvement  in  the  overall  travel  time  at  95  percent  confidence  level.  The 
reasons  were,  first  of  all,  the  low  bus-to-auto  ratio  in  the  study  section,  1:26, 
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which  caused  the  TRANSYT  program  to  give  a  set  of  signal  settings  favouring 
the  auto  progression  rather  than  that  of  the  buses.  Secondly,  the  previous 

fixed-time  signal  setting  was  a  satisfactory  one,  thus  establishing  a  good  basis 

for  comparison.  Another  cause  could  be  the  inadequate  transit  delay  weighting 
assigned  in  the  TRANSYT  input  data.  A  transit  delay  weighting  of  20  was  used 
in  the  TRANSYT  simulation. 

For  the  simulation  of  buses  in  the  TRANSYT  program,  it  appears  that 

when  the  express  bus-to-auto  ratio  is  equal  to  or  less  than  1:93,  it  is  not 
worth  while  spending  extra  time  simulating  two  separate  bus  links  for  the 
regular  stopping  and  non-stopping  buses.  One  bus  link  with  the  stopping 
consideration  will  provide  sufficient  attention.  Furthermore,  any  value  from  5  to 
30  assigned  to  the  transit  weighting  will  give  the  same  signal  settings  if  the 

bus-to-auto  ratio  is  equal  to  or  less  than  1:26 

For  the  performance  of  the  TRANSYT  program  in  the  prediction  of  the 
cyclic  flow  profile,  another  survey  was  conducted  in  the  same  study  section.  It 
appears  that  a  K  value  of  50,  employed  to  modify  the  smoothing  factor  F 

used  in  the  platoon  dispersion  formula,  was  an  appropriate  number  for  the 

morning  peak  traffic.  For  the  afternoon  peak  traffic,  there  was  disagreement 
between  the  measured  and  the  predicted  traffic  flow  patterns.  It  appears  that 

the  difference  was  caused  by,  firstly,  the  wrong  assumption  made  in  plotting 

the  profile  and,  secondly,  the  inappropriate  empirical  parameters  used  in  the 
platoon  dispersion  formula 
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I.  INTRODUCTION 


In  recent  years,  traffic  conditions  in  urban  areas  have  been  experiencing 
a  gradual  deterioration.  In  most  cases  this  has  been  caused  by  a  stagnanting 
supply  and  an  increased  demand.  The  increasing  growth  in  population  and  car 
ownership,  as  shown  in  Figures  1.1  and  1.2,  causes  a  continual  demand  for 
extending  existing  road  facilities.  The  problems  on  the  supply  side  involve  the 
lack  of  capital,  increased  costs  of  facilities,  land  availability,  and  the  lengthy  time 
needed  for  implementation.  Traffic  congestion  has  become  a  recurrent 
phenomenon  during  peak  hours.  Public  transit  has  particularly  suffered  from 
increased  traffic  congestion.  It  has  been  more  and  more  difficult  to  provide  its 

users  with  the  level  of  speed,  comfort,  and  reliability  which  they  expect. 
Nevertheless,  public  transit  should  be  encouraged  over  private  transportation  in 
many  urban  situations  because  it  can: 

1)  reduce  the  demand  on  roadway  facilities, 

2)  ease  peak  hour  congestion, 

3)  relieve  parking  problems, 

4)  increase  employment  and  social  opportunities  for  people  unable 
to  drive  automobiles, 

5)  improve  the  urban  environment, 

6)  help  in  energy  conservation. 

In  Edmonton,  transit  patronage  declined  from  1945  to  the  early  1960s. 
This  is  illustrated  in  Figure  1.3.  After  a  restructuring  of  the  transit  system  at 
that  time,  in  which  the  radial  route  and  timed  transfers  were  introduced,  the 
patronage  has  been  steadily  increasing.  Transit  usage  was  110  rides  per  capita 
in  the  year  1975.  However,  this  increase  in  patronage  has  not  prevented  the 

transit  system  from  operating  at  a  deficit.  First  of  all,  transit  is  labour  intensive 
and  operating  costs  depend  significantly  on  increasing  wages.  Secondly,  the 
productivity  of  the  transit  system  has  been  decreasing  steadily  in  the  past  few 

years,  as  shown  in  Figure  1.4.  The  main  reason  for  this  decrease  is  the  increase 
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Figure  1.1  Population  in  Alberta  and  Edmonton 


Source:  Alberta  Statistical  Review,  Annual  —  1978.  Bureau  of  Statistics,  Alberta 
Treasury,  Tables  1  and  2,  p.4. 
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Figure  1.2  Total  Motor  Vehicle  Registration  in  Alberta 


Source:  Alberta  Statistical  Review,  Annual 
Treasury,  Table  104,  p.  109. 
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Figure  1.3  Transit  Patronage  Trends  in  Edmonton 


Source:  "Rapid  Transit  Extension  Study",  Transportation  Plan,  Part  II,  Section  C, 

Volume  I,  Transportation  Planning  Department,  City  of  Edmonton,  January 
1977,  p.5. 
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Figure  1.4  Passengers  per  mile  Trends  in  Edmonton 


Source:  1.  "Public  Transportation",  -  Course  notes,  Edited  by  J.J.  Bakker, 

Department  of  Civil  Engineering,  The  University  of  Alberta,  1978. 


2.  Edmonton  Transit,  City  of  Edmonton. 
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in  mileage  within  the  system  due  to  the  expansion  of  the  city. 

In  order  to  provide  for  the  efficient  operation  of  the  transit  system, 
some  transit  priority  schemes  have  to  be  taken  into  consideration.  The  idea  of 
giving  systematic  priority  to  transit  is  not  new.  Some  measures  have  been  in 
existence  for  many  decades,  especially  in  Europe.  There  are  different  types  of 
bus  priority  schemes,  such  as: 

1)  reserved  bus  lanes, 

2)  bus-only  streets, 

3)  bus  priority  at  traffic  signals, 

4)  bus  priority  for  turning  movement, 

5)  bus  priority  in  area  traffic  control, 

6)  priority  at  bus  stops, 

7)  priority  access  to  freeways, 

8)  bus  priority  through  street  planning. 

This  study  will  concentrate  mainly  on  the  area  of  traffic  signal  priority 
for  transit.  That  is  not  to  say  that  traffic  signal  priority  is  the  most  important 
scheme  for  transit  operation.  The  others  are  also  vital  and  each  can  lead  to  an 

individual  study. 

A.  OBJECTIVES 

The  basic  objective  for  the  implementation  of  transit  priority  at  signals  is 
to  give  transit  a  preferential  treatment  in  order  to  improve  transit  services. 

Related  objectives  are  that  this: 

1)  should  not  cause  congestion  by  developing  excessive  queues, 

2)  should  not  seriously  reduce  the  capacity  of  the  intersection, 

3)  should  assist  the  flow  of  other  traffic,  if  possible, 

4)  should  not  involve  excessive  expenditure, 
should  be  enforceable. 
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At  the  beginning  of  this  study,  it  was  intended  that  a  transit  corridor  in 
Edmonton  (107  Avenue  from  101  Street  to  124  Street)  be  simulated  through  a 
computer  program,  BUSPAS .  The  objectives  were  to: 

1)  identify  the  existing  traffic  situation  of  the  proposed  corridor, 

2)  simulate  the  existing  traffic  condition  with  the  BUSPAS  program, 

3)  study  the  delay  reduction  for  transit  at  signals  through  various 

priority  schemes, 

4)  investigate  how  other  traffic  will  be  affected, 

5)  evaluate  the  overall  benefit  of  each  scheme, 

6)  recommend  the  best  signal  strategy  for  transit  operation. 

In  the  midst  of  this  study,  because  of  the  difference  in  computer 

operating  systems,  the  BUSPAS  program  could  not  be  executed.  The  area  of 
study  was  then  changed  to  an  investigation  of  the  transit  priority  in  areawide 
timing  plan.  The  new  objectives  were  to: 

1)  compare  the  performance  of  the  timing  plans  optimized  by 

TRANSYT  for  cases  with  and  without  transit  priority, 

2)  find  to  what  extent  the  consideration  of  transit  priority  in 

TRANSYT  is  applicable  to  Edmonton. 

B.  ORGANIZATION 

Chapter  II  presents  a  literature  review  of  the  different  priority  schemes 
for  transit  vehicles  and  the  studies  related  to  this  topic  that  have  been  done  in 
the  United  States,  England,  and  Edmonton. 

Chapter  III  deals  with  the  components  of  transit  travel  time,  and  presents 
an  investigation  of  the  transit  travel  time  components  in  Edmonton. 

Chapter  IV  gives  a  description  of  the  BUSPAS  computer  simulation  model, 
the  events  that  occurred  in  running  the  program,  and  the  modification  made  to 
the  program. 
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Chapter  V  describes  one  of  the  alternative  priority  schemes,  the  off-line 
optimization  technique  using  TRANSYT  version  7,  and  presents  the  results  of  a 
real-life  "  before- and -after"  study  utilizing  this  priority  treatment  strategy  in 
Edmonton. 

Finally,  Chapter  VI  presents  the  conclusions  and  recommendations  arising 
from  this  study. 


II.  LITERATURE  REVIEW 

A.  PRIORITY  SCHEMES  FOR  TRANSIT  VEHICLES 

A  variety  of  signal  priority  schemes  for  transit  vehicles  have  been 
developed.  In  summary,  there  are  two  basic  types  -  active  and  passive. 


a.  Active  approach 

The  active  approach  requires  the  actual  detection  of  a  transit  vehicle  in 
order  to  make  a  real-time  adjustment  to  signals.  It  can  be  divided  into  two 
subsets: 

1)  Unconditional  preemption 

Preemption  is  granted  whenever  a  bus  requests  it  or  is  being 
detected,  subject  only  to  safety  intervals,  such  as  pedestrian  and 
vehicular  clearances. 

2)  Conditional  preemption 

Other  factors,  such  as  the  progression  of  traffic  or  the  time 
since  last  preemption,  are  also  considered  to  determine  when  or 
if  a  preemption  will  be  granted. 


b.  Passive  approach 

The  passive  approach  does  not  need  the  requirement  set  in  the  active 
approach.  It  involves  the  provision  for  transit  in  the  design  of  a  signal  system 
in  order  to  aid  transit  operation.  There  are  five  possible  ways: 

1)  Signal  phase  for  buses  only 

On  the  average,  a  bus  accelerates  slower  than  an  automobile.  If 
an  advance  phase  of  two  to  three  seconds  duration  is  conferred 
on  buses,  sufficient  benefit  will  be  gained  by  getting  ahead  of 
other  traffic.  Of  course,  this  special  signal  has  to  be  separated 
from  the  normal  signal  so  as  not  to  confuse  other  motorists.  In 
Edmonton,  the  yellow  T  or  yellow  T  with  a  green  arrow  is  used 
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and  is  placed  higher  than  the  regular  signal. 

2)  Adjustment  of  cycle  length 

The  delay  encountered  at  a  traffic  signal  is  directly  related  to 
the  cycle  length.  When  the  cycle  length  is  increased,  so  is  the 
delay.  This  is  illustrated  in  Figure  11.1.  A  reduction  in  the  cycle 
length  will  generally  benefit  buses.  However,  consideration  should 
be  given  to  the  capacity  of  the  intersection,  because  capacity 
will  be  reduced  as  the  cycle  length  decreases.  If  reduced  cycle 
length  increases  congestion  to  the  intersection,  the  operation  of 
the  buses  will  eventually  be  affected. 

3)  Splitting  of  phases 

In  this  case,  the  overall  cycle  length  remains  unchanged,  but  the 
effective  cycle  length  for  buses  is  reduced.  This  is  demonstrated 
in  Figure  11.2.  The  normal  sequence  of  the  three-phase  signal  is 

A-B-C,  where  the  bus  movements  are  through  during  phase  A. 
If  the  bus  arrives  at  the  end  of  phase  A,  it  will  have  to  wait 
for  the  totai  time  of  phase  B  plus  phase  C.  If  we  split  phase 
A  into  two  parts  and  put  half  between  B  and  C  and  the  other 
half  between  C  and  B,  then  the  buses  will  only  have  to  wait 
through  either  phase  B  or  C.  The  net  result  is  a  reduction  of 

cycle  length  for  vehicles  in  phase  A. 

4)  Timing  plans 

The  method  used  by  most  traffic  engineers  in  designing  a  signal 
timing  plan  is  based  on  minimizing  vehicular  delay.  If  the  criterion 
of  passenger  delay  is  used  instead,  buses  should  be  granted  a 

progression  favouring  them,  simply  because  buses  carry  more 
passengers  than  private  cars.  The  off-line  computer  optimization 
program,  TRANSYT  version  5,  has  a  facility  to  give  preferential 
progression  to  bus  movements. 

5)  Metering  of  vehicles 

Metering  is  a  form  of  traffic  control  that  regulates  the  flow  of 
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2-phase,  4  arm  intersection 

Equal  flows  on  all  arms 

Equal  saturation  flows:  1 ,800  vehicles  per  hr 

Equal  green  times 

Total  lost  timer  per  cycle:  10  secs 


Figure  11.1  Effect  on  Delay  of  Variation  of  Cycle  Length 


Source:  F.V.  Webster  and  B.M.  Cobbe,  "Traffic  Signals",  Road  Research  Technical 
Paper  No.  56,  London,  England  :  Her  Majesty’s  Stationery  Office,  1966, 
p.58. 
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Figure  11.2  A  Schematic  Diagram  showing  the  Splitting  of  Phases 


Source:  Thomas  Urbanik  II,  "Priority  Treatment  of  Buses  at  Traffic  Signals", 
Transportation  Engineering,  November  1977,  p.32. 
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traffic  through  an  intersection  from  one  or  more  directions.  It  is 

analogous  to  throttling  or  gating.  An  example  is  exhibited  in 
Figure  11.3.  By  controlling  the  flow  of  traffic  at  the  metering 
intersection,  the  flow  at  a  critical  intersection  downstream  will  be 
improved.  Priority  is  given  to  buses  by  means  of  a  bus  lane  and 

perhaps  a  special  signal  phase  to  go  past  the  gating  intersection. 

B.  PREVIOUS  RESEARCH  AND  STUDIES 

Back  in  1970,  a  large  scale  urban  traffic  control  project  was  conducted 

in  the  United  States  (1).  In  this  Urban  Traffic  Control  System  ( UTCS ),  computers 
were  used  to  control  traffic  signals  in  a  portion  of  the  city.  Information  about 
volume,  occupancy,  and  queue  lengths  was  supplied  by  vehicle  detectors  on  the 
streets.  Timings  for  fixed-time  signals  were  then  selected  by  the  computer  and 
pulses  were  transmitted  to  replace  the  dial  drum  mechanisms  in  the  controllers. 

The  Bus  Priority  System  (BPS)  was  designed  to  function  as  part  of  the  UTCS. 
The  signals  along  some  bus  routes  had  cycle  times  and  splits  selected  by  the 
traffic  control  system.  Buses  were  equipped  with  a  transmitter  which  could  send 
two  codes,  one  for  stopping  and  the  other  for  non-stopping.  Before  each 
’’  priority-equi  pped"  intersection,  there  were  two  detectors.  The  bus  driver 
would  notify  the  BPS  on  the  stopping  or  non-stopping  status  of  the  bus  upon 
passing  the  upstream  detector.  As  long  as  it  had  not  crossed  the  downstream 
detector  just  in  front  of  the  stopline,  BPS  knew  that  it  had  not  left  the 
intersection.  Based  on  past  measurements,  BPS  knew  the  chances  were  that  a 
bus  passing  the  upstream  detector  at  a  certain  time  in  the  cycle  would  be  able 
to  make  use  of  a  priority.  One  second  before  the  end  of  the  green  phase  for 
the  priority  direction,  the  side  street  queue  was  checked  against  predetermined 
thresholds;  if  they  were  exceeded,  no  priority  was  given.  Then  the  number  of 

bus  passenger  seconds  saved  minus  the  cross-street  auto  passenger  seconds 
lost  was  estimated;  if  the  gain  was  positive  and  the  bus  was  still  located  in 


1  Sperry  Rand  Corporation,  Sperry  Systems  Management  Division,  "Advance 
Control  Technology  In  Urban  Traffic  Systems",  Vol.  1A,  "Bus  Priority  System 
Description",  Great  Neck,  N.Y.  1970. 
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Figure  11.3  Gating  as  a  Bus  Priority  Measure 


Source:  "Bus  Lanes  and  Busway  Systems",  A  Report  prepared  by  the 

Organization  for  Economic  Co-operation  and  Development  (OECD) 
Research  Group,  December  1976,  p.35. 
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between  the  detectors,  a  priority  of  pre-selected  length  up  to  10  seconds  was 
granted. 

Initial  results  of  the  experiment  indicated  that  the  BPS  algorithm  was  too 
restrictive  to  result  in  a  significant  improvement  in  bus  operations  -  a  total 
savings  of  about  two  to  three  minutes  travel  time  per  bus  helped  in  the 

network,  with  an  average  of  one  bus  helped  per  hour. 

A  less  restrictive  algorithm  was  used  in  a  experiment  conducted  by 
Evans  and  Skiles  (2)  in  Los  Angeles,  California.  The  priority  scheme  was  to 
extend  the  green  signal  for  transit  vehicles,  either  as  an  early  termination  of 
opposing  green  or  as  a  lengthening  of  the  green  phase  in  the  direction  of  the 
approaching  transit  vehicles.  Extensions  were  subject  to  time  limits  which 
ensured  a  minimum  cross-street  green.  The  scheme  was  simulated  by  manually 
changing  signals  at  two  intersections  along  a  bus  route;  about  half  the  bus 
route  red  signals  were  preempted.  Bus  delays,  occupancies,  and  cross-street 
delays  were  recorded  with  and  without  the  priority  simulation.  In  a  six-hour 
period,  the  observed  reductions  in  bus  passenger  delays  were  70  and  76 

percent  at  the  two  intersections,  but  the  cross-street  delays  increased  5 1  and 

24  percent  respectively.  In  terms  of  the  total  intersection  passenger  delay,  there 
was  a  reduction  of  nearly  15  percent  at  one  intersection  and  43  percent  at 
the  other  one  This  experiment  proved  that  traffic  signal  priority  could  in  fact 
improve  transit  service  and  the  performance  of  some  intersections  in  terms  of 
passenger  delay. 

In  1972,  a  demand-responsive  system  was  tested  at  Leicester  (3), 

England.  An  intersection  traffic  controller  was  instrumented  to  respond  to  signals 
transmitted  from  bus-mounted  transponders  via  a  pavement  selective  vehicle 
loop.  An  exclusive  right-turn  phase  (which  corresponds  to  the  left-turn  phase  in 

2  Henry  K.  Evans  and  Gerald  W.  Skiles,  "Improving  Public  Transit  Through  Bus 
Preemption  of  Traffic  Signals”,  Traffic  Quarterly ,  October  1970,  p.531. 

3  L.E.  Richbell  and  B.A.  Van  Averbeke,  "Bus  Priorities  At  Traffic  Control  Signals", 
Traffic  Engineering  And  Control,  June  1972,  p  70. 
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North  America)  was  given  6  to  10  seconds  of  advance  green  from  one  of 
two  other  phases.  Buses  were  timed  through  the  intersection  with  and  without 
priority.  On  the  average,  the  priority  scheme  saved  between  12  and  15  seconds 
per  bus  trip  through  the  intersection.  Also,  a  30-second  gain  would  result  if 
maximum  priority,  including  phase  skipping,  had  been  awarded  to  buses.  This 
experiment  showed  that  special  vehicle  detection  of  buses  was  possible. 

In  an  experiment  conducted  in  Woking  (4),  England,  it  was  demonstrated 
that  a  standard  loop  detector  could  also  be  used  to  detect  buses.  A  standard 
loop  detector  was  placed  in  front  of  the  stopline  of  a  " bus-only "  lane. 
Whenever  a  vehicle  was  detected,  it  interrupted  the  normal  operation  of  the 
signal  controller  and  changed  to  the  demanded  stage  as  quickly  as  possible  by 
curtailing  the  green  time  in  the  other  stages.  The  algorithm  restriction  was  that 
minimum  green  times  were  not  curtailed.  Testing  results  showed  that  time 
savings  to  buses  were  small:  7  seconds  or  less  in  mean  journey  time. 

At  more  or  less  the  same  time,  a  study  of  the  bus  priority  schemes 
was  conducted  by  Michalopoulos  (5)  in  Miami,  Florida.  The  signals  were 
preempted  upon  bus  arrival  means  of  an  optical  preemption  device.  A  high 
intensity  light  beam  was  transmitted  by  an  emitter  installed  on  the  bus;  this 
activated  a  receiver  at  the  intersection  which  in  turn  sent  a  signal  out  to  the 
controller.  The  detection  distance  was  variable  up  to  1800  feet.  If  the  signal 
was  green  when  the  bus  was  detected,  it  held  green  for  the  bus  up  to  a 
maximum  of  90  seconds.  If  the  signal  was  red,  a  green  phase  was  given  as 
soon  as  the  minimum  cross-street  green  had  been  displayed.  After  the  bus  left 
the  intersection,  right  of  way  was  transferred  to  the  cross-street  immediately 
and  normal  operations  resumed.  Testing  results  showed  that  travel  time  was 
reduced  by  25  percent  through  preemption,  and  the  creation  of  a  bus  lane 
further  lowered  it  by  8  percent.  This  experiment  also  took  comfort  measures 

4  K.  Wood,  "Survey  of  Bus  Priority  at  Traffic  Light  Signals  in  Woking",  The 
Transport  and  Road  Research  Laboratory,  SR  228,  1976. 

5  Panos  G.  Michalopoulos,  "Bus  Priority  System  Studies",  Traffic  Engineering, 

July  1976,  p.46. 
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(in  terms  of  speed  noise,  speed  changes,  number  of  stops)  and  fuel 

consumption  into  consideration,  which  both  showed  consistent  improvement. 

In  Edmonton,  a  similar  system  was  implemented  from  1974  to  1979.  A 
frequency  preemption  device  was  used  to  actuate  a  bus  crossing  signal.  This 

system  was  usually  installed  at  a  STOP  approach  of  a  collector  road  -  arterial 
road  type  of  intersection.  One  such  location  was  on  57  Avenue  and  1  1  1 

Street.  Upon  approaching  the  intersection,  the  bus  driver  activated  a  small 
transmitter  and  a  radio  frequency  was  emitted  to  the  local  controller.  The 

controller  would  then  terminate  the  green  phase  on  the  main  road  so  that  the 
bus  could  get  onto  or  cross  the  main  road.  These  signals  also  served  as 

pedestrian-actuated  crossing  signals.  The  reasons  for  the  termination  of  this 

system  were:  firstly,  the  failure  rate  of  the  system  was  high;  secondly,  the 
drivers  did  not  return  the  small  transmitters  and  the  transit  system  lost  control 
over  the  operation. 

An  improved  system  for  the  detection  of  buses  only  had  been 

successfully  developed  in  Edmonton.  No  special  on-board  equipment  was 
required  in  this  system  (6).  All  it  involved  was  a  standard  inductive  loop 
detector  and  a  special  discrimination  decision  algorithm  written  as  a 
microprogram  for  a  microcomputer.  This  algorithm  recognized  the  " signatures " 

of  buses,  i.e.  signal  outputs  caused  by  the  inductance  changes  in  the  loop 

during  the  passage  of  buses,  through  a  pre-determined  logic  involving  the 

number  of  peaks,  their  relative  magnitudes,  and  the  position  of  the  peaks.  The 

operating  reliability  of  this  system  was  as  high  as  100  percent.  At  the  present 

time,  five  locations  in  the  peripheral  areas  of  Edmonton  are  being  equipped  with 
this  system. 

The  five  experiments  mentioned  above  prove  that  special  detection  of 

6  L.  Cheng,  J.  Schnablegger  and  S.  Teply,  "Transit  Priorities  and  Development  of 
a  Passive  Bus  Detection  System  in  Edmonton",  Traffic  Engineering  and  Control 
February  1980,  p.522. 
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buses  can  be  done  with  existing  technology.  All  that  matters  is  the  cost  of 

equipment  and  its  cost-effectiveness. 

Computer  simulations  have  become  more  and  more  popular  in  the  last 
decade  due  to  the  rapid  advancement  of  electronic  technology.  The  main 

advantages  of  simulation  are  that,  firstly,  testing  can  be  done  in  the  office 

without  the  risk  of  actually  building  or  implementing  the  system  in  the  field, 

which  may  be  expensive  and  time-consuming,  and,  secondly,  the  alternatives  can 

be  tested  under  identical  conditions  which  are  impossible  to  obtain  in  the  field. 
A  necessary  condition  for  simulation  is  a  good  fit  of  the  models  used  to  test 
the  real-life  traffic  performance. 

A  simulation  model  has  been  developed  in  the  Transport  and  Road 
Research  Laboratory,  England,  to  assess  bus  priority  techniques.  It  is  called  the 
BUS  Priority  Assessment  Simulation  (BUSPAS)-  The  details  of  the  model  will  be 
discussed  in  a  later  chapter.  In  a  report  by  K.  Wood  (7),  the  predictions  from 

the  BUSPAS  program  were  compared  with  some  field  data  at  two  cities, 
Woking  and  Walsall,  in  England.  The  range  of  the  travel  time  measured  was 
between  1 5  and  42  seconds.  Most  of  the  predicted  changes  in  mean  travel 

time  of  buses  and  other  traffic  were  within  2  seconds  of  the  observed  ones; 

the  worst  was  within  5  seconds. 

Another  study  using  a  traffic  simulation  program,  called  the  SCOT  model 
(Simulation  of  COrridor  Traffic),  was  conducted  by  Lieberman,  Muzyka,  and 
Schmeider  (8)  in  Minneapolis,  Minnesota.  The  results  indicated  that  the  reduction 
in  delay  for  bus  passengers  outweighed  the  additional  delay  experienced  by 


7  K.  Wood,  "Bus-Actuated  Signal  Control  at  Isolated  Intersections  :  A  Simulation 
Model",  The  Transport  and  Road  Research  Laboratory,  SR  373,  1978. 

8  E.B.  Lieberman,  A.  Muzyka  and  D.  Schmeider,  "Bus  Priority  Signal  Control  : 
Simulation  Analysis  of  Two  Strategies”,  Transportation  Research  Record  663, 
1978,  p.26. 
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private  cars  at  intersections.  A  recent  report  by  Vincent,  Cooper,  and 
Wood  (9),  using  the  BUSPAS  program,  also  concluded  with  a  similar  finding. 

All  these  demonstrate  that  a  validated  simulation  model  is  an  effective 
tool  for  evaluating  bus  priority  schemes  without  the  high  costs  incurred  by 
actual  measurements  in  the  field. 


9  R.A.  Vincent,  B.R.  Cooper,  and  K.  Wood,  "Bus-Actuated  Signal  Control  at 
Isolated  Intersections  -  Simulation  Studies  of  Bus  Priority",  The  Transport  and 
Road  Research  Laboratory,  LR  814,  1978. 


III.  TRANSIT  TRAVEL  TIME 


A.  INTRODUCTION 

The  elements  of  a  transit  trip  are: 

1)  the  walking  time  from  the  place  of  origin  to  the  bus  stop, 

2)  the  waiting  time  at  the  bus  stop, 

3)  the  in-vehicle  time  required  to  travel  from  the  boarding  bus  stop 

to  the  destined  bus  stop, 

4)  the  transfer  time  associated  with  this  trip  if  there  is  any,  and 

5)  the  walking  time  from  the  alighting  bus  stop  to  the  final 
destination. 

In  a  survey  done  in  Edmonton  ( 1 0),  it  was  found  that  waiting  had  the 
greatest  disutility,  followed  by  walking  and  transferring.  In-vehicle  time  appeared 
to  have  the  least  factor  weighting.  In  a  separate  study  by  Gill  (11),  it  was 
found  that  in  Edmonton  waiting  time  is  not  dependent  on  the  frequency  of 
service  but  on  the  reliability  of  service  and  a  good  knowledge  of  the  schedule. 
Schedule  reliability  is  the  prime  factor  in  the  successful  operation  of  Edmonton's 

transit  system,  which  employs  a  time-transfer  concept.  That  is  to  say,  in  order 
to  make  a  time-transfer  system  work,  it  is  necessary  to  maintain  a  reliable 
transit  travel  time. 

In  the  case  of  transit  travel  time,  its  components  are: 

1)  loading  and  unloading  of  passengers, 

2)  actual  travel  along  the  route, 

3)  delays  caused  by  traffic  control  devices,  and 

4)  congestion  along  the  streets. 


10  The  Transportation  Plan,  Part  III,  Volume  I,  Engineering  and  Transportation 
Department,  The  City  of  Edmonton  ,  December,  1976. 

1  1  J.W.  Gill,  "Density  Of  Bus  Service  In  North  Edmonton",  M.Sc.  Thesis,  The 
University  Of  Alberta,  1969. 
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The  relative  contribution  of  these  components  to  total  travel  time  varies 
widely  from  city  to  city,  as  illustrated  in  Figure  III.  1.  In  order  to  have  a  clear 

understanding  of  the  situation  in  Edmonton,  a  survey  of  the  transit  travel  time 

was  conducted  on  1 07  Avenue. 

B.  OBJECTIVE  OF  THE  SURVEY  ON  107  AVENUE 

The  objective  of  the  transit  travel  time  survey  on  1 07  Avenue  was  to 
investigate  the  percentage  breakdown  of  each  delay  element,  which  would  give 
a  better  knowledge  of  what  constitutes  travel  time.  This  survey  also  provided 
necessary  information  for  the  simulation  of  buses  in  the  BUSPAS  program  later 

on. 

C.  THE  TRANSIT  TRAVEL  TIME  SURVEY 
a.  Definitions 

Before  discussing  the  survey,  there  are  a  number  of  terms  which  should 

be  defined: 

1)  Travel  time 

The  total  time  it  takes  for  a  vehicle  to  travel  over  a  section  of 
roadway. 

2)  Running  time 

The  time  during  which  a  vehicle  is  in  motion. 

3)  Operating  speed 

The  distance  travelled  by  a  vehicle  divided  by  the  travel  time, 
which  includes  running  time,  stopping  time  at  stations,  and  delays 
for  traffic  reasons. 

4)  Running  speed 

The  distance  travelled  by  a  vehicle  divided  by  the  running  time. 

5)  Stopped-time  delay 

The  delay  during  which  the  vehicle  is  standing  still. 

6)  Passenger  dwell  time 

The  time  required  to  discharge  and  take  on  passengers  at  a  bus 
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Other  Delay 

Traffic  Signal  Delay 

Passenger  Service  Time 


Run  Time 


A:  Washington,  D.C.  Buses  on  16th  Street  between  I  and  U  streets 

July  10,  1962.  Total  of  59  runs  in  peak  hour. 

B:  Toronto,  Ontario.  Buses  on  Bay  Street  between  Adelaide  and  King 

Streets,  March  1,  1974.  Total  of  39  runs  in  peak  hour. 

C:  Toronto,  Ontario.  Streetcars  on  King  route,  June  6,  1973.  Total 

of  271  runs  over  entire  day.  Run  times  computed  as  scheduled 
times  less  recorded  delay  times. 


Figure  III.  1  Breakdown  of  Public  Transit  Trip  Times 


Source:  Duncan  W.  Allen,  "Signal  Priority  for  Transit  Vehicles",  Research  Report 
No.  34,  University  of  Toronto  -  York  University,  May  1976,  p.3. 
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stop,  including  opening  and  closing  doors  and  time  spent 
standing. 

Figure  III. 2  is  a  graph  showing  the  interpretation  of  these  terms. 


b.  Survey  location  and  condition 

The  study  corridor  chosen  was  on  107  Avenue  from  101  Street  to  124 
Street,  as  shown  in  Figure  111.3.  Data  were  taken  on  Transit  Routes  3,  4,  and  7. 

Route  4  is  in  operation  only  during  peak  hours.  The  control  section  for  Routes 
3  and  4  is  from  106  Avenue  and  101  Street  to  108  Avenue  and  124  Street, 
which  has  a  length  of  3152  meters,  while  for  Route  7,  the  control  section  is 
measured  to  be  3080  meters,  starting  at  106  Avenue  and  101  Street  and 
terminating  at  107  Avenue  and  125  Street.  There  are  six  signalized  intersections 
and  twenty-five  bus  stops  within  the  study  corridor.  The  signalized  intersections 
operate  in  isolation  and  are  fully  actuated  by  vehicles,  except  for  the  one  at 
113  Street  which  is  semi-actuated. 

Data  were  collected  under  various  weather  conditions  during  weekdays  in 

order  to  reflect  the  general  transit  travel  pattern.  All  the  delays  measured  in 

this  survey  were  stopped-time  delays.  The  stopped-time  delay  was  utilized 

because  it  is  easy  to  measure,  although  it  underestimates  the  actual  delay  or 
approach  delay  by  about  24  percent  (12). 


c.  Survey  methodology 

The  observer  occupied  a  seat  in  the  front  of  the  bus  in  order  to  view 
the  traffic  conditions  clearly  and  to  measure  the  delays  accurately.  As  the  test 
run  began,  the  observer  started  one  stop  watch  which  was  used  to  read  the 
total  travel  duration  from  the  beginning  to  the  end  of  the  study  route.  Two 


12  W.R.  Reilly,  G.C.  Gardner,  and  J.H.  Kell,  "A  Technique  for  Measurement  of 
Delay  at  Intersections",  Federal  Highway  Ad  mi  ni  strati  on  Report  76-135,  Vo/.l, 
Washington,  1976. 
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Legend : 

T  =  Travel  Time 
t  =  Stopped-time  Delay 
b  =  Passenger  Dwell  Time 
D  =  Distance  of  Roadway 
T-t  =  Running  Time 

-y  =  Operating  Speed 
=  Running  Speed 


Figure  111.2  A  Time-space  Diagram  showing  the  Graphical  Interpretation 
of  Traffic  Terms 
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Figure  111.3  A  Map  of  the  City  of  Edmonton 
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more  stop  watches  were  used  for  reading  the  passenger  boarding  and  alighting 
time  and  other  stopped-time  delays  which  occurred  along  the  transit  route.  All 
the  readings  were  recorded  on  a  field  sheet 

D.  DATA  ANALYSIS  AND  DISCUSSION 

The  travel  time  data  were  then  converted  into  speed.  Both  the  operating 
speed  and  the  running  speed  were  computed  in  each  test  run.  These  figures 
are  displayed  in  Tables  III.  1  to  111.6,  and  the  summary  of  these  results  is  shown 

in  Tables  III. 7,  III. 8,  and  III. 9. 

Significance  testing  was  then  applied  to  the  running  speed  data,  which  is 

presented  in  Appendix  I.  In  the  AM,  Off,  and  PM  peak  studies,  it  was  found 

that  there  was  no  difference  in  running  speed  between  the  diesel  and  trolley 

buses  at  a  95  percent  confidence  level.  Also,  there  was  no  significant 
difference  at  a  95  percent  confidence  level  between  the  eastbound  and 
westbound  running  speeds,  except  during  the  morning  peak.  Perhaps  this  was 
due  to  the  fact  that  on  107  Avenue  during  the  morning  peak  there  was  more 
traffic  going  eastbound  than  westbound.  This  higher  volume  increased  the 

cohesion  among  the  flow,  causing  a  lower  running  speed  for  the  eastbound 
traffic,  while  for  the  off-peak  and  afternoon  peak  hours,  the  eastbound  and 

westbound  traffic  had  a  close  directional  split. 

The  percentage  breakdown  of  transit  travel  time  is  illustrated  in  Figure 

III. 4.  The  delay  at  signals  accounted  for  13.2,  18.6,  and  20.0  percent  of  the 

transit  travel  time  in  the  AM,  Off,  and  PM  peaks  respectively.  The  detailed 

components  of  stopped-time  delay  are  presented  in  Figures  111.5  to  111.8.  It  was 

found  that  the  delay  at  signals  was  the  major  component  of  all  the  delays.  It 

constituted  35.4,  47.7,  and  48.8  percent  of  the  total  stopped-time  delay  for 
the  AM,  Off,  and  PM  peaks  respectively.  These  figures  support  the  need  to 

reduce  the  delay  at  signals  for  transit  vehicles. 
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AM  EASTBOtJNO 

DIESEL 

TROLLEY 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

13.8 

22.7 

13.2 

25.1 

12.4 

20.9 

13.6 

23.8 

15.3 

24.0 

16.4 

25.2 

18.5 

25.5 

17.0 

24.4 

15.7 

24.3 

12.0 

20.6 

13.4 

19.1 

15.5 

26.7 

16.7 

25.0 

14.4 

21.9 

16.4 

24.5 

13.1 

23.4 

17.0 

26.3 

11.4 

25.6 

18.0 

26.3 

12.1 

22.1 

14.8 

25.3 

13.1 

23.6 

17.3 

25.4 

Table  III.  1  Summary  of  the  Transit  Operating  and  Running  Speeds  (AM 
Peak  Eastbound) 
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AM  WESTBOUND 

DIESEL 

TROLLEY 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

17.3 

28.9 

15.1 

24.5 

16.5 

25.0 

14.0 

26.3 

19.2 

28.2 

19.6 

28.6 

17.5 

26.9 

19.6 

30.8 

18.0 

26.5 

16.8 

25.6 

16.0 

31  .6 

17.3 

23.6 

17.2 

25.8 

19.8 

29.4 

19.3 

29.1 

17.1 

27.4 

19.2 

25.3 

16.8 

25.1 

19.6 

28.6 

Table  111.2  Summary  of  the  Transit  Operating  and  Running  Speeds  (AM 
Peak  Westbound) 


29 


OFF-PEAK  EASTBOUND 

DIESEL 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

12.8 

25.1 

16.5 

26.3 

16.1 

28.6 

16.3 

25.2 

16.0 

27.8 

15.8 

25.7 

18.0 

28.2 

14.1 

25.4 

20.2 

29.6 

16.0 

25.2 

13.4 

25.2 

16.3 

24.2 

14.5 

27.3 

18.8 

29.2 

16.2 

28.2 

19.3 

30.0 

16.8 

26.5 

14.2 

24.2 

19.8 

27.4 

17.4 

27.2 

Table  111.3  Summary  of  the  Transit  Operating  and  Running  Speeds  (Off 
Peak  Eastbound) 
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OFF-PEAK  WESTBOUND 

niESEL 

OPERATING 

RUNNING 

SPEED  (km/h) 

SPEED  (km/h) 

12.6 

23.1 

18.4 

27.6 

17.1 

24.9 

16.0 

25.3 

17.0 

29.9 

14.0 

24.3 

16.3 

28.3 

16.8 

27.1 

19.6 

28.3  .. 

19.1 

28.9 

18.2 

29.0 

16.0 

26.2 

18.4 

26.5 

17.4 

29.7 

17.1 

28.4 

17.8 

32.7 

20.4 

31  .9 

18.2 

30.7 

17.5 

28.7 

Table  111.4  Summary  of  the  Transit  Operating  and  Running  Speeds  (Off 
Peak  Westbound) 
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PM  EASTBOUND 

DIESEL 

TROLLEY 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

OPERATING 

SPEED  (km/h) 

RUNNING 

SPEED  (km/h) 

13.5 

22.9 

14.9 

23.6 

15.0 

24.0 

13.1 

24.8 

16.1 

26.1 

13.4 

26.6 

16.1 

24.1 

19.9 

29.8 

13.8 

24.2 

14.1 

24.0 

11  .5 

23.3 

12.0 

21  .7 

14.8 

24.8 

13.6 

26.8 

18.7 

26.4 

9.9 

20.6 

16.7 

28.1 

18.4 

29.7 

14.6 

25.8 

15.5 

26.9 

19.9 

30.6 

Table  111.5  Summary  of  the  Transit  Operating  and  Running  Speeds  (PM 
Peak  Eastbound) 
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PM  WESTBOUND 

DIESEL 

TROLLEY 

OPERATING 

SPEED  (km/h) 

RUNNING 

SP^ED  (km/h) 

OPERATING 

SPEER  (km/h) 

RUNNING 

SPEEn  (km/h) 

14.6 

26.2 

19.2 

27.5 

12.8 

20.8 

19.7 

29.8 

15.7 

25.1 

18.2 

27.1 

16.4 

24.1 

15.4 

26.0 

14.8 

27.8 

16.2 

27.3 

14.0 

25.4 

15.4 

22.8 

16.7 

26.6 

22.8 

32.5 

15.2 

26.2 

11.1 

22.3 

9.4 

16.7 

17.3 

26.5 

15.5 

26.0 

23.5 

32.1 

9.8 

18.2 

18.7 

29.1 

12.2 

23.2 

Table  111.6  Summary  of  the  Transit  Operating  and  Running  Speeds  (PM 
Peak  Westbound) 
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Operati ng 

Speed  (km/h) 

Runni ng 

Speed  (km/h) 

Diesel 

x  =  15.78 

x  =  24.11 

n  =  12 

s  =  1.90 

s  =  2.19 

AM 

Trol 1 ey 

x  =  13.80 

x  =  23.85 

EASTBOUND 

n  =  11 

s  =  1.83 

s  =  1.80 

Diesel  plus 
troll ey 

x  =  14.83 

x  =  23.99 

n  =  23 

s  =  2.08 

s  =  1.98 

Diesel 

x  =  17.80 

x  =  27.48 

n  =  9 

s  =  1.22 

s  =  2.16 

AM 

Trol 1 ey 

x  =  17.57 

x  =  26.99 

WESTBOUND 

n  =  10 

s  =  2.05 

s  =  2.34 

Diesel  plus 
troll ey 

x  =  17.68 

x  =  27.22 

n  =  19 

s  =  1.66 

s  =  2.21 

AM  both  ways,  both  diesel  and 

x  =  16.12 

x  =  25.45 

trolley  n  =  42 

s  =  2.37 

s  =  2.62 

Table  111.7  Summary  of  the  Mean  and  Standard  Deviation  for  Transit 
Operating  and  Running  Speeds  (AM  Peak) 
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Operati ng 

Speed  (km/h) 

Runni ng 

Speed  (km/h) 

Eastbound 
(  Diesel  only) 

x  =  16.43 

x  =  26.83 

n  =  20 

s  =  2.06 

s  =  1.78 

OFF-PEAK 

Westbound 
(  Diesel  only) 

x  =  17.26 

x  =  27.97 

n  =  19 

s  =  1.83 

s  =  2.53 

OFF-PEAK  Both  ways  n  =  39 

x  =  16.83 

s  =  1.97 

x  =  27.38 

s  =  2.22 

Table  111.8  Summary  of  the  Mean  and  Standard  Deviation  for  Transit 
Operating  and  Running  Speeds  (Off  Peak) 
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Operati ng 
^peed  (km/h) 

Runni ng 

SPeed  (km/h) 

Diesel 

x  =  15.52 

x  =  25.60 

n  =  12 

s  =  2.26 

s  =  2.21 

PM 

EASTBOUND 

Trolley 

n  =  9 

x  =  14.37 

s  =  3.08 

x  =  25.29 

s  =  3.23 

Diesel  plus 
trolley 
n  =  21 

x  =  15.02 

s  =  2.64 

x  =  25.47 

s  =  2.62 

Diesel 

x  =  14.51 

x  =  24.49 

n  =  10 

s  =  2.12 

s  =  3.32 

PM 

WESTBOUND 

Trolley 

n  =  13 

x  =  16.88 

s  =  4.16 

x  =  26.49 

s  =  4.07 

Diesel  plus 
trolley 
n  =  23 

x  =  15.85 

s  =  3.57 

x  =  25.62 

s  =  3.82 

PM  Both  ways , 

both  diesel  and 

trolley  n  =  44 

x  =  15.46 

s  =  3.15 

x  =  25.55 

s  =  3.26 

Table  111.9  Summary  of  the  Mean  and  Standard  Deviation  for  Transit 
Operating  and  Running  Speeds  (PM  Peak) 


PERCENT  OF  TRIP  TIME  (  T0TAL=100%  ) 
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11  .3% 

Other  delays 

9.8% 

10.8% 

13.2% 

Signal  delay 

18.6% 

20.0% 

12.9% 
Passenger 
dwell  time 

—  -  ^ 

^  ^  - 

— 

10.6% 

10.2% 

—  —  — «... 

62.6% 

61.0% 

59.0% 

Running  time 

AM 

42  Runs 


OFF-PEAK  PM 

39  Runs  44  Runs 


Figure  111.4  Percentage  of  Transit  Travel  Time  Components  on  107 
Avenue  from  101  Street  to  124  Street 


Percentage  Breakdown  of  Delay  (Total -100%) 
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Running  time  62.6%  Delays  37.4% 

l~ . . .  i  - 1 

0  62 . 6%  1 00% 

Percent  of  Total  Travel  Time 


*  Layover  at  Bus  Stops 
**  21  out  of  42  Runs  are  Trolley  Buses 


Figure  111.5  Summary  of  the  Transit  Delay  on  107  Avenue  from  101 
Street  to  124  Street  (AM  Peak) 


Percentage  Breakdown  of  Delay  (Total-100%) 


Running  time  61.0% 


Delays  39.0% 


0  61.0%  100% 

Percent  of  Total  Travel  Time 

~1  47.7%  -  Traffic  signals 

_  27.2  %  -  Passenger  dwell  time 

■3  12.8%  -  Driver  intentionally  kill  time* * 

- 1  5.0%  -  Bus  zone  interference 

I  3.6%  -  Turns 

-  Railway  crossing 

-  General  congestion 

-  Pedestrians 

-  Cross  traffic 

*  Layover  at  Bus  Stops 


3  1.8% 

]  0.9% 

1  0.7% 
1  0.3% 


Figure  111.6  Summary  of  the  Transit  Delay  on  107  Avenue  from  101 
Street  to  124  Street  (Off  Peak) 


Percentage  Breakdown  of  Delay  (Total=100%) 


Running  time  59.0% 


Del  ays  41 . 0% 


0  59.0%  100% 

Percent  of  Total  Travel  Time 


*  Layover  at  Bus  Stops 
**  21  out  of  42  Runs  are  Trolley  Buses 


Figure  III. 7  Summary  of  the  Transit  Delay  on  107  Avenue  from  101 
Street  to  124  Street  (PM  Peak) 
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Percentage  Breakdown  of  Delay  (Total=100%) 
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Running  time  60.7% 


Delays  39.3% 


0 


60.7%  100% 

Percent  of  Total  Travel  Time 


42.8%  -  Traffic  signals 


29.2%  -  Passenger  dwell  time 


11.4%  -  Driver  intentionally  kill  time* 


J  7.3%  -  General  congestion 


^  3.0%  -  Turns 

2.7%  -  Bus  zone  interference 

3  1.5%  -  Railway  crossing 

]  1 .0%  -  Pedestrians 

]  0.6%  -  Trolley  poles  resetting** 

]  0.5%  -  Cross  traffic 


*  Layover  at  Bus  Stops 
**  43  out  of  86  Runs  are  Trolley  Buses 


Figure  111.8  Summary  of  the  Transit  Delay  on  107  Avenue  from  101 
Street  to  124  Street  (AM  and  PM  Peaks  Combined) 
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The  implementation  of  transit  signal  priority  does  not  necessarily  produce 
a  drastic  saving  in  time.  However,  the  reliability  of  transit  travel  time  will  be 
improved  and  having  a  reliable  schedule  operation  will  enable  the  time-transfer 
system  to  function  properly. 
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IV.  THE  BUSPAS  COMPUTER  SIMULATION  MODEL 


A.  INTRODUCTION 

It  was  first  intended  in  this  thesis  that  a  transit  corridor  be  simulated 
through  a  computer  program  and  the  benefits  and/or  disbenefits  of  various 
priority  treatments  be  evaulated.  A  computer  simulation  program  was  brought  to 
Edmonton  through  the  courtesy  of  the  Transport  and  Road  Research  Laboratory, 

England.  This  program,  called  BUS  Priority  Assessment  Simulation  [BUSPAS),  was 
developed  from  another  simulation  program  named  ROS/M  (13).  The  following 
section  gives  a  brief  description  of  the  model. 

B.  DESCRIPTION  OF  THE  MODEL 

BUSPAS  is  a  microscopic  traffic  model  in  which  individual  vehicles  are 

simulated.  Each  vehicle  is  represented  by  a  block  of  computer  words,  and  all 
the  vehicles  are  dimensionally  identical.  An  average  vehicle  length  is  specified  in 
the  program  input  data.  This  average  length  includes  the  length  of  the  gap  to 
the  following  vehicle  in  a  static  vehicle  queue.  The  road  network  is  represented 

by  a  set  of  discrete  decision  points,  usually  stoplines  and  detectors,  joined  by 

a  one-way  road  link.  Two-way  roads  are  represented  by  a  pair  of  one-way 

links.  Vehicles  enter  and  leave  the  network  at  fixed  points  and  each  vehicle  is 

considered  once  in  every  simulated  second.  Each  program  cycle  represents  one 
simulated  second.  BUSPAS  uses  a  binomial  distribution  of  vehicle  arrival.  The 
model  transfers  vehicles  between  two  decision  points  at  a  speed  which  is 
randomly  selected  from  a  distribution  about  the  mean  speed  for  that  link. 

Turning  movements  at  intersections  are  determined  from  pre-stored  turning 
probabilities  at  each  intersection,  using  a  random  number  routine.  A  vehicle  may 
be  delayed  before  a  stopline  by  red  lights,  may  join  a  queue  of  vehicles 
discharging  from  the  stopline,  or  may  be  impeded  by  a  turning  vehicle  waiting 

for  a  gap  in  the  opposing  flow.  The  model  outputs  the  number  of  vehicles  that 

13  R.G.  Needham,  "ROSIM  :  A  Simulation  Program  of  a  Road  Network 
Controlled  by  Traffic  Responsive  Signals",  Paper  presented  at  1st  Symposium 
Internationale  sur  la  regulation  du  traffic,  Versailles,  June  1970. 
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have  crossed  each  stopline,  plus  the  total  delay  and  average  journey  time 
through  the  link. 

ROSIM  includes  a  facility  to  select  certain  vehicles  and  follow  them 
through  the  network.  These  special  vehicles  have  been  used  in  BUSPAS  to 
represent  buses.  Special  detectors  simulate  selective  bus  detectors  and  the 
particular  priority  strategy  given  to  buses  at  traffic  signals  can  be  specified  by 
the  user.  BUSPAS  is  based  on  vehicle-actuated  traffic  signals  but  can  simulate 
fixed  time  signals.  A  summary  of  the  operation  of  the  traffic  signals  may  also 
be  printed  if  required. 

C.  MEMORANDUM 

The  BUSPAS  program  was  received  in  magnetic-tape  form  on  July  9, 
1979.  It  was  then  mounted  and  compiled  on  the  university's  computer  system. 
At  the  same  time,  a  simple  schematic  network  was  set  up  for  a  trial  run.  This 
is  illustrated  in  Figure  IV.  1.  A  listing  of  the  input  data  for  this  network  is 
shown  in  Figure  IV.2.  After  the  initial  trial  run,  it  was  found  that  there  were 
some  undefined  variables  and  language  problems  within  the  program.  Some  of 
these  variables  were  local  system  subroutines  which  were  not  available  in  the 
university's  computer  system,  and  others  were  program  subroutines  that  were 
simply  missing. 

The  problems  encountered  were  brought  to  the  attention  of  the  Transport 
and  Road  Research  Laboratory  through  correspondence.  Some  necessary 
information  and  updated  routines  were  received  and  added  to  the  program 
during  the  months  of  August  and  September,  1979.  However,  it  was  still  unable 
to  give  decent  output,  a  copy  of  which  is  in  Appendix  II.  In  Appendix  III  is 
output  from  the  ICL  computer  at  the  Transport  and  Road  Research  Laboratory. 
Because  of  the  large  size  of  the  program,  it  was  difficult  to  locate  all  the 
errors.  Furthermore,  due  to  the  limitation  of  time,  work  had  finally  to  come  to 


a  halt. 
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Figure  IV.  1  Location  of  Decision  Points  in  a  Network 
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A  listing  of  the  modified  BUSPAS  is  enclosed  in  Appendix  IV.  The  notes 
on  the  input  data  are  presented  in  Appendix  V.  The  modifications  made  to  the 
program  were  as  follows: 

1)  In  the  definition  of  variables,  the  2-byte  integer  fields  were 

inadequate  and  caused  an  error  message  in  return.  As  a  result, 

all  integer  declarations  had  to  be  changed  to  4  bytes. 

2)  Some  subroutines  had  inconsistent  COMMON  declarations  as 
compared  with  the  main  program,  and  these  were  rectified. 

3)  The  routines  RAND1  and  RANDI  were  substituted  by  the  random 

number  generator  routine  GGUBFS  in  the  university's  local  IMSL 
library. 

4)  The  routine  FINISH,  which  is  called  in  the  subroutine 

ENDJOB  (line  3502),  was  replaced  by  the  routine  EXIT  that  is 

available  from  the  university's  system  subroutine  library. 

5)  The  logical  system  functions  JAND,  JINOR,  and  JEXOR  were 
substitued  by  LAND,  LOR,  and  LXOR  respectively. 

6)  It  was  learned  from  the  documentation  provided  that  the 

subroutine  STXIT,  which  is  called  in  line  68  of  the  main 

program,  is  an  assembler  facility  for  stopping  the  job.  However, 
this  routine  is  called  in  the  midst  of  the  main  program  and  it 
was  felt  that  the  information  supplied  may  not  be  correct  It 

appears  that  the  routine  is  irrelevant  to  the  simulation  results, 

thus  it  was  suppressed  by  changing  the  line  to  a  COMMENT 

statement. 

7)  The  routine  COMENT,  which  is  a  local  routine  to  put  a  message 
in  the  job  journal  within  the  Transport  and  Road  Research 
Laboratory  computer  system,  and  the  routines  CLOCK  and 
CLOCK  1,  which  both  time  the  program,  were  restrained  for  the 
same  reason. 

8)  In  the  subroutine  READ,  lines  2126  to  2140  had  to  be 
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concealed  because  they  gave  a  series  of  undefined  stopline 
printouts  which  were  again  irrelevant  to  the  simulation  results. 

Since  the  BUS  PAS  program  was  not  in  its  operative  mode,  the  objective 
of  testing  various  transit  priority  schemes  through  simulation  could  not  be 
carried  out  in  this  thesis.  The  area  of  study  was  then  changed  to  an 
investigation  of  the  transit  priority  in  areawide  timing  plan  which  is  described  in 
the  following  chapter. 

The  BUSPAS  program  was  finally  in  operation  at  the  time  this  thesis  was 


written. 


* 
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V.  TRANSIT  PRIORITY  IN  AREAWIDE  TIMING  PLAN 


A.  INTRODUCTION 

In  the  conventional  signal  timing  plan  design,  the  criterion  most  used  by 

traffic  engineers  is  to  minimize  the  vehicular  delays  and  stops.  A  typical 
time-space  diagram  is  illustrated  in  Figure  V.  1.  On  the  average,  buses  accelerate 
and  travel  slower  than  private  cars.  When  these  characteristics  are  combined 

with  the  dwelling  time  incurred  at  bus  stops,  buses  are  often  stopped  by  a  red 
light  at  the  next  intersection.  If  the  criterion  of  minimizing  passenger  delay  is 
used  instead,  then  the  bus  progression  speed  and  time  spent  at  bus  stops 
should  be  taken  into  consideration.  Figure  V.2  shows  the  progression  of  buses 
after  they  are  given  attention.  The  offset  at  the  downstream  intersection  is 

altered  so  that  an  approaching  bus  receives  a  green  phase  when  it  arrives.  This 
may  cause  some  delays  to  other  traffic,  but  this  is  justified  because  of  the 
large  number  of  persons  that  buses  carry  when  the  total  passenger  delay  of 

the  intersection  is  taken  into  account.  An  application  of  this  methodology  in  the 
off-line  optimization  technique,  TRANSYT,  is  described  in  the  following  sections. 

B.  THE  TRANSYT  COMPUTER  PROGRAM 

TRANSYT,  which  stands  for  TRAffic  Network  StudY  Tool  (14),  was 
developed  at  the  Transport  and  Road  Research  Laboratory,  England,  in  1967.  It 
is  a  method  of  modelling  traffic  behaviour  through  platoon  dispersion  in  a 
roadway  network.  It  includes  a  procedure  that  optimizes  splits  and  offsets 
alternately  by  minimizing  a  performance  index.  The  performance  index  is  a  linear 
combination  of  stops  and  delays  that  is  specified  by  the  user.  TRANSYT  makes 
the  following  assumptions  about  the  traffic  situation: 

1)  All  the  major  intersections  in  the  network  have  signals. 

2)  All  the  signals  in  the  network  have  a  known  common  cycle  time 
or  a  cycle  time  of  half  this  value. 


14  D.l.  Robertson,  " TRANSYT  :  A  Traffic  Network  Study  Tool",  The  Transport 
and  Road  Research  Laboratory,  LR  253,  1969. 
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Legend: 


Auto  Progression 


Figure  V.  1  A  Time-space  Diagram  for  the  Auto  and  Bus  Progressions 


Figure  V.2  Signal  Modification  to  Favour  the  Bus  Progression 
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3)  Traffic  enters  the  network  at  a  constant,  predetermined  rate. 

4)  The  proportion  of  traffic  turning  left  or  right  at  each  signal 

remains  constant  throughout  the  cycle. 

The  optimization  procedure  begins  with  the  calculation  of  the  performance 

index  of  the  network  for  an  initial  set  of  signal  timings  using  the  network 
traffic  model.  The  next  stage  is  to  evoke  an  optimization  routine,  which  is 
based  on  a  "pattern  search  technique".  The  offset  of  one  of  the  signals  is 

altered  by  a  certain  "step",  which  is  specified  by  the  user,  and  the 
performance  index  of  the  network  is  recalculated.  If  the  index  is  reduced,  then 

the  offset  is  altered  successively  in  the  same  direction  until  a  minimum 
performance  index  is  obtained.  If  the  index  is  increased,  then  the  offset  of  the 
signal  is  altered  in  a  direction  opposite  to  that  of  the  initial  "step"  until  the 
minimum  performance  index  is  obtained.  The  offset  of  each  signal  in  turn  is 

adjusted  in  this  way  in  a  specified  order.  The  process  of  optimizing  the  offset 
of  each  signal  in  turn  is  repeated  a  number  of  times  to  obtain  the  final  signal 

settings.  Phase  splits  may  be  held  constant  or  may  be  optimized  by  introducing 
negative  increments  in  the  "hilldimbing"  process. 

The  TRANSYT  program  prints  out  the  following  data: 

1)  A  copy  of  the  input  data. 

2)  A  tabulation  of  signal  splits  and  offsets  for  each  intersection. 

3)  A  tabulation  of  traffic  flow  characteristics  for  each  link. 

4)  Optional  graphs  of  the  arrival  and  discharge  flow  pattern  on 

each  link. 

5)  Optional  time-space  diagrams  for  a  specified  number  of  linked 

intersections. 

A  copy  of  the  TRANSYT  output  is  enclosed  in  Appendix  VI.  The 
summary  of  signal  settings  is  expressed  in  terms  of  "steps".  For  the  traffic 
flow  characteristics  of  each  link,  the  following  information  is  provided: 
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Link  number 

Bus  links  are  marked  with  * 

Total  flow 

This  is  expressed  in  vehicles  per  hour. 

Saturation  flow 

This  is  the  maximum  rate  of  discharge  from  a  queue  and  can 
be  obtained  by  measurement  or  calculation  based  on  the  physical 
site  factors.  Links  having  shared  stoplines  are  identified  by  a 

letter  'L'  or  'S'  after  a  number  in  the  saturation  flow  column. 
The  'L'  indicates  that  the  preceding  number  is  not  a  saturation 
flow  but  the  number  of  the  link  it  is  sharing  a  stopline  with.  'S' 
indicates  that  the  link  shares  its  stopline  with  other  links,  and  the 
number  preceding  the  'S'  is  the  saturation  flow  at  the  shared 

stopline.  This  is  also  expressed  in  vehicles  per  hour. 

Degree  of  saturation 

This  is  expressed  as  a  percentage  and  it  is  the  ratio: 

Total  flow  x  Cycle  time 

— -  x  100 

Saturation  flow  x  Effective  green  time 

It  shows  the  spare  green  time  available  and  how  near  the  link  is 

to  maximum  capacity.  A  vaiue  of  over  100  means  the  link  is 

oversaturated  and  a  queue  will  grow  steadily  as  the  flow 

condition  prevails. 

Distance  travelled 

This  is  the  product  of  total  flow  and  the  link  length.  It 

represents  the  vehicle  demand  in  the  network.  This  is  expressed 
in  vehicle  kilometres  per  hour. 

Time  spent 

This  is  the  average  number  of  vehicles  present  on  the  link  and 
is  made  up  of  the  sum  of  the  average  number  delayed  (uniform 
and  random)  plus  the  average  number  travelling  along  the  link. 
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The  average  number  of  travelling  vehicles  is  obtained  from  the 
total  flow  multiplied  by  the  link  travel  time  and  is  assumed  to 
be  unaffected  by  the  signal  settings.  This  is  expressed  in  vehicle 
hours  per  hour. 

Uniform  delay 

This  is  the  average  number  of  vehicles  queueing  on  the  link, 
assuming  there  is  no  random  fluctuation  in  traffic  behaviour  from 
cycle  to  cycle.  This  is  expressed  in  vehicle  hours  per  hour. 
Random  delay 

This  is  a  correction  applied  to  account  for  the  extra  delay 

caused  by  random  fluctuation  in  vehicle  flow.  It  is  a  function  of 
the  degree  of  saturation  of  the  link.  The  total  average  delay  on 
a  link  is  the  sum  of  the  random  and  uniform  delay.  When  the 
degree  of  saturation  exceeds  100,  the  random  delay  is  modified 
to  give  the  average  extra  delay  which  would  result  from  the 

growth  of  the  vehicle  queueing  over  the  time  period  requested 
for  simulation.  This  is  also  expressed  in  vehicle  hours  per  hour. 
Uniform  stops 

This  is  the  average  number  of  vehicles  per  second  which  have 
to  stop  at  the  stopline.  Any  finite  delay  is  assumed  to  cause  a 

stop,  even  though  in  practice  the  vehicle  involved  may  have 
undergone  only  a  small  deceleration  and  acceleration.  For  this 
reason,  the  predicted  stops  value  is  an  overestimate  of  actual 

stops  unless  optional  input  information  is  used  with  a  realistic 
set  of  stop  and  delay  equivalences.  The  value  in  brackets  is  the 

percentage  of  all  vehicles  which  have  to  stop.  No  correction  is 

made  for  random  effects. 

Maximum  uniform  queue 

This  is  the  average  value  of  the  maximum  number  of  queueing 

vehicles  calculated  to  occur  in  the  signal  cycle.  No  correction  is 

made  for  random  effects  and  there  is  a  50  percent  probability 
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of  exceeding  this  maximum  value.  The  average  value  of  the 
maximum  queue  is  a  useful  guide  to  the  vehicle  storage  capacity 
required  in  a  section  of  road.  Unless  the  actual  storage 
comfortably  exceeds  the  maximum  queue  value,  there  will  likely 
be  difficulty  with  blocking  back  into  the  upstream  intersection. 

Exit  signal 

This  is  the  node  number  which  controls  the  link  exit. 

Green  period 

The  two  values  are  the  start  and  end  of  the  actual  green  time 
as  specified  in  the  input  data.  The  correction  to  effective  green 
time  is  obtained  by  adding  the  lags  specified  at  input. 


a.  Representation  of  buses  in  TRANSYT 

In  the  early  version  of  TRANSYT,  there  is  no  distinction  between 
different  classes  of  vehicles,  for  there  is  only  one  platoon  dispersion  formula 
representing  the  traffic  flow  within  a  network.  The  platoon  dispersion  formula  is 
given  by: 


q'(i+T)  =  F  q(i)  +  (1-F)  q'(i+T-1) 
where 

q(i)  is  the  flow  in  the  ith  time  interval  of  the  initial  platoon. 

q’(i+T)  is  the  flow  in  the  (i+T)th  time  interval  of  the  predicted 
platoon. 

T  is  0.8  times  the  average  travel  time,  t,  in  number  of  "steps". 

F  is  the  smoothing  factor. 

A  number  K  in  the  range  of  1  to  100  can  be  specified  in  the  input 
data  to  modify  the  smoothing  factor  F  as  follows: 

1 


F 


1  +  KT/100 


* 
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where 

K  is  a  value  between  1  and  100,  a  negative  value  gives  zero 
dispersion  but  a  zero  gives  the  default  value  of  50. 


In  1972,  TRANSYT  version  5  was  introduced  at  the  Transport  and  Road 
Research  Laboratory  (15).  It  includes  a  facility  for  representing  multiple  links  at  a 
common  stopiine,  plus  consideration  for  variations  in  bus  running  speed  and  time 

spent  at  bus  stops  along  a  link.  The  basic  principle  is  to  separate  the  delay 
calculation  for  transit  and  private  vehicles.  Additional  formulae  are  utilized  to 

account  for  the  bus  stopping  and  non-stopping  situation  along  a  link.  The 

smoothing  factor  used  in  the  bus  dispersion  formula  is  given  by: 


F  = 


1 

1  +  0.7b  +  0.1 5r 


and  the  time  displacement,  T,  of  the  bus  flow  entering  along  the  road  is  given 
by: 


T  =  0.3b  +  0.85r 


The  values  of  b  and  r  are  calculated  from  the  following  formulae: 


If  b  =  0 

3.6  d 

r  =  - 

v 


If  b  >  0  and  d  >  60 

3.6  (d-60) 

r  =  16  +  - - 

v 


15  D.l.  Robertson,  and  R.A.  Vincent,  "Bus  Priority  in  a  Network  of  Fixed  Time 
Signals",  The  Transport  and  Road  Research  Laboratory,  LR  666,  1975. 
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If  b  >  0  and  d  <  60 
r  =  74.27  d 

where 

b  is  the  average  time,  in  seconds,  spent  stationary  at  a  bus 

stop. 

d  is  the  length  of  road  between  intersections  in  meters. 

r  is  the  running  time  in  seconds. 

v  is  the  average  free  running  speed  of  the  bus  (km/h). 

These  formulae  allow  for  acceleration  and  deceleration  time  losses  caused 
by  stopping  at  bus  stops.  Futhermore,  different  delay  weightings  can  be  applied 
to  each  class  of  vehicle.  If  transit  priority  is  desired,  transit  vehicles  can  be 
assigned  a  delay  weighting  in  the  input  data  that  is  higher  than  the  weighting 

for  private  cars.  Then  the  optimization  process  attempts  to  find  a  fixed-time 

signal  plan  which  gives  buses  some  degree  of  priority  over  other  traffic. 


b.  The  effect  of  delay  weighting  to  transit 

In  a  study  by  Peirce  and  Wood  (16)  in  England,  the  effects  of  varying 
the  bus  delay  weighting  were  tested  using  a  trial  network  of  24  intersections. 

Figure  V.3  shows  that  when  the  bus  delay  weighting  is  increased,  bus  delays 
are  reduced,  while  delays  to  other  traffic  are  increased.  It  was  estimated  that. 

1)  approximately  two-thirds  of  the  bus  benefit  came  from 

optimizing  the  offsets,  and 

2)  the  remaining  one-thirds  came  from  optimizing  the  green 
intervals. 

In  theory,  choosing  the  transit  weighting  according  to  the  relative 

occupancies  of  buses  and  other  vehicles  should  give  the  least  overall  passenger 
delay  in  the  network.  However,  it  is  not  considered  feasible  to  measure 


16  J.R.  Peirce  and  K.  Wood,  "BUS  TRANSYT  -  A  User's  Guide",  The  Transport 
and  Road  Research  Laboratory,  SR  266,  1977. 
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occupancies  of  every  vehicle  within  the  network.  An  approximation  of  the 
occupancies  appears  to  be  a  logical  approach.  In  Edmonton,  a  transit  delay 
weighting  of  20  is  customarily  used  by  the  staff  of  the  Engineering  Department. 

C.  AUTO  AND  TRANSIT  TRAVEL  TIME  SURVEY 

In  order  to  test  the  performance  of  the  TRANSYT  program  with  bus 
priority,  a  real-life  "before- and -after”  study  for  the  auto  and  transit  travel  time 
was  carried  out.  The  "before"  case  utilized  a  standard  signal  timing  plan 
optimized  by  TRANSYT,  in  which  bus  volume  was  combined  with  auto  traffic.  A 
bus  was  counted  as  the  equivalent  of  three  passenger  car  units.  In  the  "after" 
case,  special  consideration  was  given  to  transit  during  the  optimization  of  the 
timing  plan  through  TRANSYT. 

(, N.B .  In  this  study  the  term  "auto"  refers  to  all  vehicles  except  transit  vehicles.) 


a.  Objective  of  the  survey 

The  main  goal  of  the  survey  was  to  find  out  whether  there  was  a 

significant  increase  or  decrease  in  both  transit  and  auto  travel  time  and  delay  at 
intersections  between  the  "before”  and  "after"  cases.  Both  morning  and 

afternoon  peak  traffic  were  under  investigation. 


b.  Survey  location 

The  study  section  was  located  on  Jasper  Avenue  between  1  1  1  Street 
and  117  Street,  as  shown  in  Figure  V.4.  It  consists  of  four  signalized 
intersections  and  measures  734  meters  in  length.  All  the  signals  in  the  study 
section  are  of  fixed-time  mode  and  operate  as  a  linked  system. 


c.  Preparation  of  the  signal  timing  plans 

Before  the  survey  was  conducted,  the  timing  plans  for  the 
"before- and -after"  studies  had  to  be  prepared  Both  of  the  signal  timing  plans 
used  for  the  AM  and  PM  peaks  for  the  "before"  case  and  the  PM  peak  for 
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Figure  V.4  A  Map  of  the  City  of  Edmonton 
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the  "after"  case  were  developed  by  the  staff  of  the  Engineering  Department, 
City  of  Edmonton.  The  AM  peak  timing  plan  for  the  "after"  case  was  prepared 

by  the  author.  The  output  from  the  TRANSYT  simulation  is  enclosed  in  Appendix 
VI.  The  following  memoranda  were  made  during  the  preparation  of  the  AM  peak 

timing  plan: 

1)  The  simulated  network  consisted  of  13  signalized  intersections 

from  108  Street  to  121  Street  along  Jasper  Avenue  and  100 

Avenue.  Figure  V.5  shows  a  plan  of  the  network.  This  network 

was  extracted  from  the  entire  CBD  network  because  of  its 

tremendous  size.  A  trial  run  of  this  sub-network  for  the  PM 

peak  in  the  "after"  case  had  been  carried  out  to  compare  with 
the  overall  CBD  network  timing  plan.  It  was  found  that  in  most 

cases  the  offsets  and  splits  on  Jasper  Avenue  in  the 

sub-network  plan  agreed  with  the  overall  CBD  network  plan,  with 
the  worst  within  2  seconds.  These  are  demonstrated  in  Figures 
V.6  and  V.7. 

2)  The  cycle  length  used  in  the  simulation  was  86  seconds.  This 

was  determined  at  the  "constraint"  intersection  at  1 09  Street 
and  Jasper  Avenue. 

3)  The  inflow  and  saturation  flow  for  each  link  were  calculated 

using  the  intersection  surveys  prepared  by  the  Engineering 

Department,  City  of  Edmonton. 

4)  The  eastbound  auto  traffic  was  assigned  a  delay  weighting  of  5. 

At  first  it  was  suspected  that  this  assignment  would  probably 

cancel  any  benefits  derived  from  the  bus  delay  weighting.  A 

second  trial  run  was  carried  out  without  using  any  delay 
weighting  for  the  auto  traffic  in  the  network.  The  output  for 
this  trial  run  is  enclosed  in  Appendix  VII.  The  stop  penalty  was 
the  same  for  both  cases.  The  bus  performance  index  obtained 
was  16.06  as  compared  to  16.07  in  the  first  case.  This 

difference  is  insignificant  but  the  offsets  and  splits  do  vary 


•  1 


60 


0) 

(O 

u 

in 


+-> 

o 


a; 

.a 

£ 

3 

C 

OJ 

TJ 

O 


t- 

cu  u 

-Q  QJ 

E  -O 

=>  E 

SO  3 

c 

C 

•f-  c 


o 

+J  in 

3  3 

<  CQ 


I 

oo* 

evil 
'  I 
I 


Figure  V.5  A  Plan  of  the  Study  Section 
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between  the  two  plans.  In  spite  of  that  the  first  case  was 
implemented  as  it  was  felt  that  eastbound  auto  traffic  is  crucial 
during  the  morning  peak. 

5)  Two  bus  links  were  simulated  for  the  eastbound  movement  on 

Jasper  Avenue,  one  for  regular  buses  and  the  other  for  express 
buses.  Another  trial  was  executed,  this  one  simulating  only  one 

bus  link  with  bus  stops.  The  output  is  presented  in  Appendix 
VIII.  The  delay  weighting  assigned  to  transit  was  20  in  both 

cases.  The  results  were  compared  and  it  was  found  that  there 
was  no  difference  between  the  two  sets  of  signal  offsets  and 
splits.  This  was  probably  due  to  the  low  number  of  express 
buses  present  (only  fourteen  for  the  non-stopping  bus  link).  This 
demonstrates  that  the  program  is  insensitive  to  small  input 
volume.  Thus,  from  an  operational  point  of  view,  it  is  not  worth 
while  spending  extra  time  simulating  two  separate  bus  links  for 
one  when  the  express  bus-to-auto  ratio  is  equal  to  or  less  than 
1:93. 

(. N.B .  It  was  felt  that  the  indicator  " bus-to-auto  ratio"  was  more 
appropriate  than  just  considering  the  bus  volume  alone.  In  this 
particular  case,  there  were  14  express  buses  and  an  average 
auto  volume  of  1300  vehicles  per  hour  in  a  eastbound  direction. 

Thus  the  express  bus-to-auto  ratio  calcuated  was  1:93.) 

6)  No  special  provision  was  made  for  either  the  auto  or  bus 
movement  in  a  westbound  direction. 


d.  Survey  personnel 

The  data  collection  was  carried  out  by  two  teams,  with  two  persons  in 
each  team.  The  first  team  was  responsible  for  the  auto  travel  time  study,  in 
which  one  person  drove  the  car  and  the  other  person  recorded  the  data.  The 
second  team  was  responsible  for  transit  travel  time.  Each  person  rode  the  bus 
separately  and  recorded  his  own  data. 


« 
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e.  Survey  methodology 

The  observer  for  the  transit  survey  occupied  a  seat  in  the  front  of  the 

bus  in  order  to  view  traffic  conditions  clearly.  As  the  test  run  began,  he 

started  a  stop-watch  with  a  split-hand  on  it.  Whenever  the  bus  began  to  slow 

down  for  a  red  light  at  an  intersection,  he  would  press  the  split-hand  button. 

By  doing  so,  he  was  able  to  take  the  reading  from  the  split  without  stopping 

the  clock  internally.  Then  the  observer  reset  the  split-hand  after  he  had 
recorded  the  time.  When  the  bus  crossed  the  stopline  on  a  green  interval,  he 

would  press  the  split-hand  button  and  repeat  the  same  procedure.  The 

difference  between  the  two  recorded  times  was  the  true  delay  encountered  at 

an  intersection.  This  process  is  referred  to  as  the  approach  delay  method,  as 

illustrated  in  Figure  V.8.  The  dwelling  time  of  the  bus  was  taken  from  the  time 

it  came  to  a  complete  halt  at  a  bus  stop  until  it  started  moving  again.  Other 

delays  encountered  along  the  route  (for  instance,  at  a  pedestrian  crossing  or 

where  a  car  was  parked  within  the  bus  stop  zone),  were  measured  similarly. 

The  stop-watch  was  stopped  at  the  end  of  the  study  section  and  the  overall 
travel  time  recorded. 

The  auto  survey  was  similiar  to  that  of  the  bus,  except  the  passenger 

boarding  and  alighting  time  was  excluded.  The  test  vehicle  was  driven  along  the 

study  route  using  the  floating-car  technique;  that  is,  the  vehicle  was  driven 

according  to  the  driver's  judgement  of  the  average  speed  of  the  traffic  stream. 

D.  INTERPRETATION  OF  THE  RESULTS 

The  data  for  the  AM  " before "  and  PM  "after"  cases  were  collected  on 

January  15  and  16,  1980,  while  the  AM  "after"  and  PM  "before"  data  were 

collected  on  April  1  and  2,  1980.  Past  experience  in  Edmonton  showed  that 

seasonal  traffic  variations  are  predictable  and  stable  (17).  This  is  illustrated  in 
Figure  V.9.  Thus,  the  data  taken  in  the  "before"  and  the  "after"  cases  were 

comparable. 

17  "A  Transportation  Management  System  for  the  City  of  Edmonton”,  Engineering 
Department,  City  of  Edmonton,  1977,  p.9. 
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Legend : 

Auto  Progression 
a  =  Approach  Delay 
t  =  Stopped-time  Delay 


Fiqure  V8  A  Time-space  Diagram  showing  the  Difference  between  the 
Approach  Delay  and  Stopped-time  Delay 
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Daily  traffic  variations  at 
Jasper  Avenue  East  of 
122nd  Street 


Hourly  traffic  variations  at 
James  McOonald  bridge, 
St.  Albert  Trail  and 
63rd  Avenue  underpass 


Figure  V.9  Traffic  Variations  in  Edmonton 


Source:  "A  Transportation  Management  System  for  the  City  of  Edmonton", 
Engineering  Department,  City  of  Edmonton,  January  1977,  p.9. 
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The  recorded  data  were  converted  into  speed  and  summarized  in  Tables 
V.  1  to  V.  16.  The  minimum  sample  size  requirements  with  95  percent  confidence 

level  were  checked  utilizing  the  figures  listed  in  the  Manual  of  Traffic 
Engineering  Studies,  published  by  the  Institute  of  Transportation  Engineers  (See 

Table  V.  17).  Given  that  the  permitted  error  in  the  estimate  of  mean  travel  speed 
for  " before- and -after"  studies  is  +2  km/h,  the  average  range  in  the  running 
speeds  of  the  recorded  data  was  calculated,  as  shown  in  Tables  V.  18  and  V.  19. 
The  number  of  completed  test  runs  met  with  the  minimum  sample  size 

requirements  as  specified  in  Table  V.  17. 

f 

The  percentage  changes  in  both  operating  and  running  speeds  for  the 
" before-and-after"  studies  were  calculated  and  summarized  in  Tables  V. 20  and 
V.21.  In  all  cases,  the  figures  indicate  that  there  were  improvements  in  both  the 
operating  and  running  speeds  after  the  implementation  of  the  new  signal  timing 
plan.  In  terms  of  statistics,  some  of  these  improvements  were  not  significant  at 
a  95  percent  confidence  level.  Appendix  IX  contains  the  significance  testing  of 
the  operating  and  running  speeds,  and  Appendix  X  is  the  significance  testing  of 
the  total  average  approach  delay.  Following  are  the  analyses  of  the 

"before-and-after"  studies  on  a  directional  basis. 


a.  AM  eastbound  movement 

During  the  morning  peak  this  was  the  direction  in  which  buses  were 
given  favourable  progression  in  the  simulation.  From  the  analysis  of  the  field 

data,  it  was  found  that  auto  traffic  significantly  improved  in  overall  travel  time, 

but  not  buses.  In  terms  of  approach  delay,  there  was  a  significant  reduction  in 
bus  delay  at  intersections,  as  shown  in  Table  V.22.  This  was  also  supported  by 

the  reduced  percentage  of  buses  stopping  at  intersections,  as  illustrated  in 

Figure  V.  10.  In  other  words,  the  new  timing  plan  gave  some  degree  of 
improvement  to  transit  but  not  enough  to  affect  the  overall  travel  time 
significantly.  The  bus  dwelling  time  for  the  "before-and-after"  studies  remained 
more  or  less  the  same,  as  exhibited  in  Table  V.24. 
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Table  V  1  Summary  of  Auto  Speed  and  Delay  Study  (AM  Peak  Eastbound 
" Before "  Case) 
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Table  V.9  Summary  of  Auto  Speed  and  Delay  Study  (PM  Peak  Eastbound 
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Table  V.  12  Summary  of  Bus  Speed  and  Delay  Study  (PM  Peak  Eastbound 
"After"  Case) 
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Table  V.  13  Summary  of  Auto  Speed  and  Delay  Study  (PM  Peak  Westbound 
"Before"  Case) 
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Table  V.  14  Summary  of  Auto  Speed  and  Delay  Study  (PM  Peak  Westbound 
"After"  Case) 
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BEFORE"  -  April  1  &  2,  1980  Time:  16:15  -  17:15  Condition:  Good 

Table  V.  15  Summary  of  Bus  Speed  and  Delay  Study  (PM  Peak  Westbound 
"Before"  Case) 
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Table  V.  16  Summary  of  Bus  Speed  and  Delay  Study  (PM  Peak  Westbound 
"After"  Case) 
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Average  Range 
in 

Running  Speed 
(kph) 

Minimum  Number  of  Runs 

Specified  Permitted  Error 

±2.0  kph 

±3.5  kph 

±5.0  kph 

±6.5  kph 

±8.0  kph 

5.0 

4 

3 

2 

2 

2 

10.0 

8 

4 

3 

3 

2 

15.0 

14 

7 

5 

3 

3 

20.0 

21 

9 

6 

5 

4 

25.0 

28 

13 

8 

6 

5 

30.0 

38 

16 

10 

7 

6 

Table  V.  17  Minimum  Sample  Size  Requirements  for  Speed  and  Delay 
Studies  with  95  percent  Confidence  Level 


Source:  "Manual  of  Traffic  Engineering  Studies",  Institute  of  Transportation 
Engineers,  Fourth  Edition,  1976,  p.  165. 
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AM 

AUTO 

BUS 

Before 

After 

Before 

After 

R  =  2.8 

R  =  4.7 

R  =  3.9 

R  =  2.2 

EASTBOUND 

N  =  4 

N  =  4 

N  =  4 

N  =  4 

n  =  12 

n  =  12 

n  =  1 5 

n  =  15 

R  =  3.0 

R  =  3.6 

R  =  1  .9 

R  =  5.6 

WESTBOUND 

N  =  4 

N  =  4 

N  =  4 

N  =  4 

n  =  12 

n  =  12 

n  =  14 

n  =  14 

R  =  ES 
n  -  1 

where  R  =  Average  range  in 

running  speed  (Km/h) 

ZS  =  Sum  of  values  for  all 

running  speed  difference 
( Km/h ) 

N  =  Number  of  required  test 
runs  estimated  from 
Table  V. 17 

n  =  Number  of  completed  test 
runs 


Table  V. 18 


Comparison  of  the  Number  of  Required 
and  Completed  Test  Runs  (AM  PeaK) 
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PM 

AUTO 

BUS 

Before 

After 

Before 

After 

R  =  4.9 

R  =  3.6 

R  =  4.4 

R  =  6.9 

EASTBOUND 

N  =  4 

N  =  4 

N  =  4 

N  =  6 

n  =  12 

n  =  12 

n  =  13 

n  =  13 

R  =  6.5 

R  =  8.  1 

R  =  4.  1 

R  =  4.0 

WESTBOUND 

N  =  5 

N  =  6 

N  =  4 

N  =  4 

n  =  12 

n  =  12 

n  =  14 

n  =  14 

R  =  ES 
n  -  1 

where  R  =  Average  range  in 

running  speed  (Km/h) 

53S  =  Sum  of  values  for  all 

running  speed  difference 
( Km/h ) 

N  =  Number  of  required  test 
runs  estimated  from 
Table  V. 17 

n  =  Number  of  completed  test 
runs 


Table  V . 1 9 


Comparison  of  the  Number  of  Required 
and  Completed  Test  Runs  (PM  PeaK) 
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AM 

AUTO 

BUS 

Operat i ng 
Speed 

Running 

Speed 

Operat i ng 
Speed 

Running 

Speed 

* 

* 

# 

it 

EASTBOUND 

+42.2% 

+26.4% 

+10.0% 

+  8.7% 

* 

* 

* 

* 

WESTBOUND 

+16.3% 

+  9.7% 

+21.4% 

+2 1 . 0% 

*  Significant  at  95%  confidence  level 
it  Not  significant  at  95%  confidence  level 


Table  V.20  Percentage  Change  in  the  Morning  Peak 

Performance  of  the  " Before- and- after"  Studies 
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PM 

AUTO 

BUS 

Operat i ng 
Speed 

Running 

Speed 

Operat i ng 
Speed 

Running 

Speed 

EASTBOUND 

# 

+12.0% 

+  3.7% 

# 

+  9.1% 

* 

+15.0% 

WESTBOUND 

# 

+  0.1% 

* 

+19.0% 

# 

+  0.7% 

# 

+  7.3% 

*  Significant  at  95%  confidence  level 

#  Not  significant  at  95%  confidence  level 


Table  V.21  Percentage  Change  in  the  Afternoon  Peak 

Performance  of  the  " Before- and -after"  Studies 
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AM 

AUTO 

BUS 

Before 

After 

Before 

After 

EASTBOUND 

n  =  48 
x  =  17.2 
s  =  20.0 

n  =  48 
x  =  9.8 

s  =  14.4 

n  =  60 
x  =  1  1  .7 
s  =  14.3 

n  =  60 
x  =  6.9 

s  =  12.0 

* 

-  43.0% 

* 

-  41.0% 

WESTBOUND 

n  =  36 
x  =  12.3 
s  =  12.9 

n  =  36 
x  =  10.5 
s  =  13.1 

n  =  42 
x  =  8.7 

s  =  12.4 

n  =  42 
x  =  5.7 

s  =  9.6 

# 

-  14.6% 

-  34.5% 

*  Significant  at  95%  confidence  level 

#  Not  significant  at  95%  confidence  level 


Legend  : 

n  =  Number  of  samples 
x  =  Average  approach  delay  (sec.) 
s  =  Sample  standard  deviation 


Table  V. 22  Summary  of  the  Total  Average  Approach 

Delay  (AM  Peak) 


. 
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PM 

AUTO 

BUS 

Before 

After 

Before 

After 

EASTBOUND 

n  =  48 
x  =  18.3 
s  =  17.3 

n  =  48 
x  =  17.  1 
s  =  15.5 

n  =  52 
x  =  15.0 
s  =  15.8 

n  =  52 
x  =  13.0 
s  =  16.5 

# 

-  6.6% 

# 

-  13.3% 

WESTBOUND 

n  =  36 
x  =  17.6 
s  =  16.8 

n  =  36 
x  =  8.4 

s  =  14.5 

n  =  42 
x  =  10.4 
s  =  14.8 

n  =  42 
x  =  8.5 

s  =  12. 1 

* 

-  52.3% 

# 

-  18.3% 

*  Significant  at  95%  confidence  level 

#  Not  significant  at  95%  confidence  level 


Legend  : 

n  =  Number  of  samples 
x  =  Average  approach  delay  (sec.) 
s  =  Sample  standard  deviation 


Table  V. 23  Summary  of  the  Total  Average  Approach 

Delay  (PM  Peak) 
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BUS  DWELLING  TIME 


AIVI 

Before 

After 

EASTBOUND 

n  =  45 
x  =  22.5 
s  =  13.3 

n  =  45 
x  =  22. 1 
s  =  9.7 

§ 

-  1  . 8% 

WESTBOUND 

n  =  42 
x  =  9.7 

s  =  5.5 

n  =  42 
x  =  8.8 

s  =  4.3 

# 

-  9.3% 

#  Not  significant  at  95%  confidence  level 


Legend  : 

n  =  Number  of  samples 
x  =  Average  dwelling  time  (sec.) 
s  =  Sample  standard  deviation 


Table  V.24  Summary  of  the  Bus  Dwelling  Time  (AM  Peak) 
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BUS  DWELLING  TIME 


rm 

Before 

After 

EASTBOUND 

n  =  39 
x  =  16.5 
s  =  8.3 

n  =  39 
x  =  18.1 
s  =  1  1  .9 

# 

+  9.7% 

WESTBOUND 

n  =  42 
x  =  13.7 
s  =  7.3 

n  =  42 
x  =  14.4 
s  =  7.7 

# 

+  5.1% 

**  Not  significant  at  95%  confidence  level 


Legend  : 

n  =  Number  of  samples 
x  =  Average  dwelling  time  (sec.) 
s  =  Sample  standard  deviation 


Table  V. 25  Summary  of  the  Bus  Dwelling  Time  (PM  Peak) 


V 

PERCENTAGE  OF  STOPS  AT  INTERSECTIONS 
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100% 


Legend : 

I  I  Before 

E3  After 
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Figure  V.  1 0  Percentage  of  Stops  at  Intersections  (AM  Peak  Eastbound) 
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Figure  V.  1  1  Percentage  of  Stops  at  Intersections  (AM  Peak  Westbound) 
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Figure  V.  12  Percentage  of  Stops  at  Intersections  (PM  Peak  Eastbound) 
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Figure  V.  1 3  Percentage  of  Stops  at  Intersections  (PM  Peak  Westbound) 
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b.  AM  westbound  movement 

Although  no  special  provision  was  made  for  auto  or  bus  movement  for 
this  direction  during  the  TRANSYT  simulation,  the  results,  as  shown  in  Table 
V.20,  indicate  that  there  were  significant  increases  in  the  overall  travel  time  for 
both  categories  of  vehicles.  There  were  no  significant  changes  in  the  bus 
dwelling  time,  as  shown  in  Table  V.24,  and  the  total  average  approach  delay  for 
both  auto  and  bus,  as  illustrated  in  Table  V.22. 


c,  PM  eastbound  movement 

Once  again,  bus  and  auto  traffic  in  this  direction  were  not  given  any 
special  attention  during  the  preparation  of  the  signal  timing  plan.  Even  though 
there  were  some  increases  in  the  overall  travel  time  and  the  total  average 
approach  delay,  as  shown  in  Tables  V.21  and  V.23  respectively,  they  were  not 
significant  at  a  95  percent  confidence  level.  Also,  there  was  no  significant 
change  in  the  bus  dwelling  time,  as  shown  in  Table  V.25. 


d.  PM  westbound  movement 

The  results  indicate  that  buses  did  not  gain  any  significant  improvement  in 
overall  travel  time  and  the  total  average  approach  delay.  Tables  V.21  and  V. 23 
show  that  the  buses  did  not  have  any  priority  at  all,  as  they  were  expected  to 
have.  The  passenger  boarding  and  alighting  time  .had  a  5.1  percent  increase  but 
this  is  not  significant  at  a  95  percent  confidence  level.  This  is  illustrated  in 
Table  V.25. 

As  shown  in  Table  V.21,  the  auto  traffic  had  a  insignificant  increase  in 
overall  travel  time.  Yet  it  had  a  significant  increase  in  running  speed  and  total 
average  approach  delay,  as  exhibited  in  Tables  V.21  and  V. 23  respectively.  The 
latter  finding  is  further  supported  by  the  reduced  percentage  of  stops  at 
intersections,  as  illustrated  in  Figure  V.  13. 
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A  probable  cause  for  this  contradictory  result  was  the  inconsistencies  of 
survey  personnel.  As  mentioned  before,  the  delay  encountered  at  intersections 
was  measured  using  the  approach  delay  method.  The  exact  time  taken  when  the 
vehicle  begins  to  slow  down  is  purely  up  to  the  judgement  of  the  person  who 
records  the  data.  The  different  survey  personnel  in  the  "  before- and -after" 
studies  may  have  caused  this  discordant  finding. 

Since  the  findings  were  discouraging  and  it  was  felt  that  a  small  survey 
should  be  conducted  to  investigate  the  performance  of  the  TRANSYT  program, 
a  cyclic  flow  profile  survey  was  carried  out.  It  is  described  in  the  following 
sections. 

E.  CYCLIC  FLOW  PROFILE  SURVEY 

The  output  from  TRANSYT  includes  an  optional  graphical  representation  of 
traffic  behaviour  at  stoplines.  This  is  called  the  cyclic  flow  profile,  which 

represents  the  variation  of  flow  during  the  signal  cycle.  The  symbols  and 
'  | '  represent  the  flow  up  to  the  stopline,  while  and  '~i'  represent  the  flow 

leaving  the  stopline.  The  two  flow  patterns  are  overlaid  so  that  the  flow 

distortion  caused  by  the  red  and  green  periods  of  the  signal  can  be  observed 
easily.  Vehicular  flows  marked  '  | '  are  stopped  by  the  red  light  and  leave  at  a 

later  time  at  saturation  rate  as  shown  by  the  symbols  ' — i'. 

The  variation  in  the  height  of  the  cyclic  flow  profile  corresponds  to  the 

movement  of  platoons  of  traffic  along  the  street.  The  peaks  and  their  locations 
within  the  graph  give  the  time  when  the  platoons  will  arrive  at  the  downstream 
intersection,  and  they  are  important  for  good  signal  co-ordination.  The  cyclic 
flow  profile  can  also  provide  information  such  as  average  flow,  major  and 
minor  road  flow,  saturation  flow,  spare  green  time,  traffic  incidents,  platoon 
speed  and  dispersion. 
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a.  Objective  of  the  survey 

The  main  objective  of  this  survey  was  to  compare  the  actual  cyclic  flow 
profiles  with  the  ones  obtained  from  TRANSYT  simulation,  and  to  find  whether 
or  not  there  is  a  difference  between  the  actual  and  the  predicted  flow 
patterns. 


b.  Survey  methodology 

The  observer  stood  on  the  sidewalk  at  the  downstream  signal 
intersection.  It  was  important  that  the  observer  chose  a  survey  station  beyond 
the  maximum  queue  length  of  the  downstream  traffic.  The  distance  between  the 
survey  station  and  the  stopline  was  measured  in  order  to  transfer  the  cyclic 
flow  profile  histogram  back  to  the  stopline  for  later  analysis.  The  observer 
started  his  survey  when  the  upstream  main  road  signal  turned  green,  and 
recorded  all  cars,  commercial  vehicles  and  buses  on  the  cassette-recorder  as 
they  passed  his  station.  It  should  be  stressed  that  the  identification  of  the  start 
of  green  in  each  cycle  was  a  good  practice  for  accuracy  and  convenience. 
Twenty-one  successive  cycles  were  recorded. 


c.  Comparison  of  the  results 

Due  to  the  limitation  of  manpower  and  funds,  data  were  collected  at 
only  1  1 2  Street  on  Jasper  Avenue  for  the  AM  eastbound  movement  and  at 
114  Street  on  Jasper  Avenue  for  the  PM  westbound  movement.  These 
movements  were  chosen  because  buses  were  simulated  separately  in  the 
TRANSYT  program.  The  measured  cyclic  flow  profiles  for  auto  and  buses  can 
be  compared  separately  with  the  predicted  ones  to  reveal  if  there  is  any 
difference  between  theory  and  practice. 

The  cyclic  flow  profiles  were  plotted  using  4-second  intervals.  The  95 
percent  confidence  intervals  of  the  actual  flow  profile  were  also  plotted.  The 
cyclic  flow  profiles  from  the  TRANSYT  output  were  then  transferred  onto  these 


. 
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figures  for  comparison. 


i.  AM  peak  movement 

Judging  from  Figures  V.  14  to  V.  16,  the  actual  flow  profile  during 

the  morning  peak  comes  very  close  to  the  predicted  flow  pattern  for  auto 
traffic.  For  the  regular  service  buses,  the  same  finding  is  true.  As  for  the 
express  buses,  the  predicted  profile  shows  a  continuous  flow  pattern 
allocated  within  a  certain  time  interval,  while  the  measured  profile  shows  a 

discrete  flow  pattern  within  the  same  time  interval.  This  can  be  explained 
by  the  fact  that  the  TRANSYT  program  assumes  a  constant  inflow  rate  at 
the  entrance  node  of  the  network,  whereas  these  express  buses  are 

governed  by  certain  schedule  headways.  However,  this  is  not  too  critical  as 
the  volume  of  the  express  buses  is  quite  low  when  compared  with  the 

total  traffic  and  will  cause  no  significant  change  to  the  overall  shape  in 
the  cyclic  flow  profile  for  superimposed  bus  and  auto  traffic. 


ii.  PM  peak  movement 

During  the  afternoon  peak,  only  one  bus  link  was  simulated  for  the 

"after”  case  by  the  staff  of  the  Engineering  Department,  City  of 
Edmonton.  The  predicted  bus  flow  pattern,  as  shown  in  Figure  V.  17, 
appears  to  have  a  much  lower  flow  rate  than  the  measured  one,  which 

indicates  that  the  input  values  for  the  buses  were  underestimated  when 
running  the  program.  In  spite  of  that,  the  two  general  trends  are  very 
much  alike. 

As  for  the  auto  traffic,  the  predicted  cyclic  flow  profile  greatly 
differs  from  the  measured  profile,  as  shown  in  Figure  V.  18.  This  signifies 

a  difference  between  theory  and  practice.  However,  the  observation  here  in 
Edmonton  comes  as  no  surprise  since  the  same  findings  are  true  in  other 

cities.  The  first  probable  cause  for  this  result  was  the  crude  assumption 
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Figure  V.  14  Cyclic  Flow  Profile  on  Jasper  Avenue  and  112  Street  (AM 
Eastbound  Auto  only) 
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Figure  V.  18  Cyclic  Flow  Profile  on  Jasper  Avenue  and  114  Street  (PM 
Westbound  Auto  only) 
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made  in  plotting  the  cyclic  flow  profile.  In  the  TRANSYT  program,  the 
platoon  of  vehicles  is  dispersed  and  transferred  from  an  upstream  stopline 

to  the  next  stopline  downstream.  During  the  survey,  data  were  taken  at  a 

distance  (beyond  the  maximum  queue  length)  from  the  downstream  stopline, 
and  the  cyclic  flow  profile  was  then  shifted  the  equivalent  displacement  on 
the  graph  based  on  the  assumption  that  there  was  no  dispersion  within 
that  distance.  The  second  cause  was  probably  the  empirical  values  used  in 

the  platoon  dispersion  formula.  In  the  TRANSYT  program,  Robertson  utilized 
a  K  value  of  50  and  a  T  value  of  0.8  times  the  average  travel  time,  in 

which  0.8  is  the  ratio  between  the  platoon  leader  travel  time  and  the 
average  travel  time  of  the  entire  platoon.  These  two  parameters  may  not 
be  appropriate  in  Edmonton.  In  a  study  by  El-Reedy  and  Ashworth  (18),  it 
was  suggested  that  0.8  should  not  be  fixed,  but  should  be  dependent  on 
the  locally  observed  distribution  of  travel  time  in  order  to  account  for 
those  vehicles  whose  travel  times  were  appreciably  below  the  average.  A 
calibrated  combination  of  these  two  parameters  could  compensate  for  the 

diversity  between  the  predicted  and  observed  patterns. 

F.  ANALYSES  OF  THE  TRANSIT  DELAY  WEIGHTING  AND  THE  TIME-SPACE 
DIAGRAMS 

At  this  point,  it  was  suspected  that  the  offsets  and  splits  of  the  signal 

timing  plan  were  governed  by  the  auto  traffic  in  the  "after”  case.  As  described 
earlier  in  this  chapter,  the  TRANSYT  program  uses  a  procedure  that  optimizes 

splits  and  offsets  alternately  by  minimizing  a  performance  index,  and  one  of  the 

constituents  of  this  index  is  the  sum  of  uniform  delay  and  random  delay  times 
the  delay  weighting.  When  the  traffic  flow  input  is  low,  the  degree  of 

saturation  will  be  low  and  its  corresponding  uniform  and  random  delay  will  also 

be  low.  The  input  values  in  the  eastbound  direction  averaged  1300  vehicles  per 
hour  for  the  auto  traffic  and  50  buses  per  hour  for  the  transit.  (The 

corresponding  bus-to-auto  ratio  was  1:26.)  The  delay  weighting  assigned  to 

18  T.Y.  El-Reedy,  and  R.  Ashworth,  "Platoon  Dispersion  Along  a  Major  Road  in 
Sheffield",  Traffic  Engineering  and  Control,  April  1978,  p.  186. 
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buses  was  20.  The  final  performance  indices  for  the  auto  and  bus  movements 

were  265  and  16  respectively.  The  flow  patterns  between  the  morning  peak 

"before"  and  "after"  cases  are  generally  the  same,  as  shown  in  the  two 
time-space  diagrams.  Figures  V.  19  and  V.20  respectively.  Perhaps  through 

assigning  a  bus  delay  weighting  higher  than  20  the  signal  settings  will  be 
altered.  A  trial  run  of  the  simulation  was  then  conducted,  in  which  buses  were 

assigned  a  delay  weighting  value  of  30.  The  output  is  presented  in  Appendix  XI. 
The  summary  of  the  final  signal  settings  is  shown  in  Table  V. 26,  while  Table 
V.27  is  an  abstract  of  the  final  signal  setting  obtained  by  assigning  a  bus  delay 
weighting  of  20.  It  was  found  that  there  was  no  difference  between  the  two 

sets  of  signal  settings.  Next,  two  more  cases  were  simulated,  one  utilizing  a 

bus  delay  weighting  of  10  and  the  other  a  value  of  5.  Tables  V.28  and  V.29 
show  the  summary  of  the  two  sets  of  final  signal  settings,  and  the  computer 

outputs  are  shown  in  Appendices  XII  and  XIII  respectively.  Once  again,  the  signal 

offsets  and  splits  for  all  four  cases  are  identical. 

When  the  time-space  diagrams  of  the  " before ”  and  "after"  cases  in  the 
afternoon  peak  were  compared,  as  shown  in  Figures  V.2 1  and  V. 22,  the  times 
spent  by  buses  in  the  study  section  were  more  or  less  the  same.  Thus,  it  was 
concluded  that  there  is  not  enough  bus  volume  in  the  "after"  case  to  cause 

the  TRANSYT  program  to  give  buses  a  significant  preferential  progression.  And 

when  the  bus-to-auto  ratio  is  equal  to  or  less  than  1:26,  any  value  from  5  to 
30  assigned  to  the  bus  delay  weighting  will  give  the  same  signal  settings. 

G.  CONCLUSION 

Although  the  application  of  the  BUS  TRANSYT  program  had  been 
effective  in  England  (19),  this  was  not  the  case  for  the  experiment  here  in 
Edmonton.  The  results  of  the  " before-and-after"  study  showed  that  buses  did 

not  gain  a  significant  improvement  in  travel  time  as  expected.  The  reasons 
appear  to  be,  first  of  all,  that  there  was  not  enough  bus  volume  in  the  study 

19  D.l.  Robertson  and  R.A.  Vincent,  "Bus  Priority  in  a  Network  of  Fixed-time 
Signals”,  The  Transport  and  Road  Research  Laboratory ,  LR  666,  1975. 


' 


106 


116  St.  114  St.  112  St.  Ill  St. 

Scale:  Legend: 

Horizontal  1:3000  Auto  Progression 

Vertical  1mm  =  2  seconds  — — ►  Bus  Progression 

Figure  V.  19  A  Time-space  Diagram  for  the  " Before "  Case  (AM  Peak)  j  Bus  Stop 
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CBD  WEST  NETWORK 

-  108- 

-121  STREET  AM  PEAK 

NODE 

NUMBER 

STAGE 

STAGE 

STAGE 

STAGE 

NO. 

OF  STAGES 

1 

2 

3 

4 

46 

4 

20 

36 

7 

10 

48 

2 

16 

3 

61 

2 

35 

23 

65 

2 

3 

36 

76 

2 

40 

26 

81 

2 

5 

34 

83 

3 

33 

4 

21 

85 

2 

35 

22 

87 

2 

14 

1 

89 

2 

33 

20 

91 

3 

37 

18 

31 

93 

2 

32 

22 

95 

2 

25 

1  1 

Table  V.26  Summary  of  the  Final  Signal  Settings  with  a  Bus  Delay 
Weighting  of  30 
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WEST  NETWORK 

-  108- 

-121  STREET  AM  PEAK 

NODE  NUMBER 

STAGE 

STAGE 

STAGE  STAGE 

NO. 

OF  STAGES 

1 

2 

3  4 

46 

4 

20 

36 

7  10 

48 

2 

16 

3 

61 

2 

35 

23 

65 

2 

3 

36 

76 

2 

40 

26 

81 

2 

5 

34 

83 

3 

33 

4 

21 

85 

2 

35 

22 

87 

2 

14 

1 

89 

2 

33 

20 

91 

3 

37 

18 

31 

93 

2 

32 

22 

95 

2 

25 

1  1 

Table  V.27  Summary  of  the  Final  Signal  Settings  with  a  Bus  Delay 
Weighting  of  20 
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CBD 

WEST  NETWORK 

-  108- 

-121  STREET  AM  PEAK 

NODE  NUMBER 

STAGE 

STAGE 

STAGE 

STAGE 

NO. 

OF  STAGES 

1 

2 

3 

4 

46 

4 

20 

36 

7 

10 

48 

2 

16 

3 

61 

2 

35 

23 

65 

2 

3 

36 
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31 

93 
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32 

22 

95 

2 

25 

1  1 

Table  V.28  Summary  of  the  Final  Signal  Settings  with  a  Bus  Delay 
Weighting  of  10 
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NODE 

NUMBER 

STAGE 

STAGE 

STAGE 

STAGE 

NO. 

OF  STAGES 

1 

2 

3 

4 

46 

4 

20 

36 

7 

10 

48 
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16 

3 

61 

2 

35 

23 

65 
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3 

36 

76 

2 

40 

26 

81 

2 

5 

34 

83 

3 

33 

4 

21 

85 

2 

35 

22 

87 

2 

14 

1 

89 

2 

33 

20 

91 

3 

37 

18 

31 

93 

2 

32 

22 

95 

2 
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1  1 

Table  V.29  Summary  of  the  Final  Signal  Settings  with  a  Bus  Delay 
Weighting  of  5 
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section  to  influence  the  TRANSYT  program  for  a  set  of  signal  settings 

favouring  the  bus  progression.  The  bus-to-auto  ratio  in  the  study  section  is 
1:26.  Secondly,  the  fixed-time  signal  setting  used  in  the  " before "  case  was  a 
satisfactory  one.  Even  though  there  were  some  improvements  in  the  "after" 

case,  they  were  not  significant  at  a  95  percent  confidence  level  because  the 
basis  for  comparison  was  good. 

For  the  simulation  of  buses  in  the  TRANSYT  program,  it  appears  that 
when  the  express  bus-to-auto  ratio  is  equal  or  less  than  1:93,  it  is  not  worth 

while  spending  extra  time  simulating  two  separate  bus  links  for  the  regular  and 
express  buses.  One  bus  link  representing  the  regular  bus  is  adequate.  Moreover, 
any  value  from  5  to  30  assigned  to  the  bus  delay  weighting  will  not  affect 

the  final  outcome  if  the  bus-to-auto  ratio  is  equal  to  or  less  than  1:26. 

For  the  K  value,  which  is  employed  to  modify  the  smoothing  factor  in 
the  platoon  dispersion  formula,  a  value  of  50  appears  to  be  an  appropriate 
number  for  the  morning  peak  traffic.  It  appears  that  the  difference  between  the 
measured  and  predicted  cyclic  flow  profiles  during  the  afternoon  peak  was 
caused  by,  firstly,  the  wrong  assumption  made  in  plotting  the  profile,  and 
secondly,  the  inappropriate  empirical  parameters  used  in  the  platoon  dispersion 
formula. 


VI.  CONCLUSIONS  AND  RECOMMENDATIONS 


In  the  first  part  of  this  study,  a  transit  travel  time  survey  was  conducted 
on  107  Avenue  from  101  Street  to  124  Street  The  following  findings  were  a 

result  of  this  survey: 

1)  In  the  study  section,  total  stopped-time  delay  accounted  for 

37.4,  39.0,  and  41.0  percent  of  the  transit  travel  time  for  the 
AM,  Off,  and  PM  peaks  respectively.  On  the  average,  it  was 

about  39  percent. 

2)  The  delay  at  signals  accounted  for  13.2,  18.6,  and  20.0  percent 
of  the  transit  travel  time  during  the  AM,  Off,  and  PM  peaks 
respectively.  On  the  average,  it  was  about  17  percent. 

3)  The  transit  delay  at  signals  constituted  the  highest  percentage  of 

the  total  stopped-time  delay.  It  was  35.4,  47.7,  and  48.8 

percent  of  the  total  stopped-time  delay  for  the  AM,  Off,  and 
PM  peaks  respectively.  On  the  average,  it  was  about  44  percent. 

4)  There  was  no  difference  between  the  running  speeds  of  the 
diesel  and  trolley  buses  at  a  95  percent  confidence  level. 

It  appears  that  the  second  finding  mentioned  above  was  caused  by  the 
inefficient  operation  of  the  signal  system  in  the  study  section.  The  six  signalized 
intersections  are  traffic  actuated  and  are  interconnected  in  no  way  whatsoever. 

This  means  that  each  intersection  will  accommodate  the  traffic  flows  based  on 

the  detector  information  at  that  intersection  alone.  The  arrival  of  a  bus  at  the 
next  intersection  is  purely  a  random  event.  It  appears  that  in  order  to  reduce 
delays  and  improve  traffic  flow,  there  is  a  strong  need  to  operate  these 
signals  in  a  linked  manner  rather  than  in  isolation.  At  this  writing,  the  signals  on 
107  Avenue  are  operated  as  a  linked  system  in  a  fixed-time  mode. 

In  the  second  part  of  this  thesis,  a  real-life  " before- and -after"  study 
was  carried  out  on  Jasper  Avenue  from  111  Street  to  117  Street.  The 


conclusions  were  as  follows: 

1)  It  was  found  that  buses  did  not  gain  a  significant  improvement 

in  travel  time  as  expected. 

2)  It  appears  that  the  cause  was  the  low  bus-to-auto  ratio  in  the 

study  section,  1:26,  which  caused  the  TRANSYT  program  to  give 

a  set  of  signal  settings  favouring  the  auto  progression  rather 

than  that  of  the  buses.  Besides,  the  basis  for  comparison  was 

good  because  the  signal  setting  in  the  " before "  case  was  a 

satisfactory  one. 

3)  For  the  simulation  of  buses  in  the  TRANSYT  program,  it  appears 

that  when  the  express  bus-to-auto  ratio  is  equal  to  or  less  than 
1:93,  it  is  not  worth  while  spending  extra  time  simulating  two 
separate  bus  links  for  the  regular  stopping  and  non-stopping 

buses.  One  bus  link  with  the  stopping  consideration  will  provide 

sufficient  attention. 

4)  It  appears  that  any  value  from  5  to  30  assigned  to  the  transit 

weighting  will  give  the  same  signal  settings  if  the  bus-to-auto 

ratio  is  equal  to  or  less  than  1:26. 

Despite  the  results  of  the  "  before- and -after”  study,  it  is  still 

recommended  that  the  simulation  of  buses  be  included  in  the  optimization  of 
the  signal  settings  using  TRANSYT.  At  least  some  benefits  to  buses  (as  shown 

in  Tables  V.20  and  V.21),  although  not  statistically  significant,  can  be  obtained 
merely  by  changes  in  the  fixed-time  signal  settings.  It  is  important  to  realize 
that  no  additional  equipment  is  necessary  for  implementing  the  method  once 

facilities  are  established  for  connecting  the  signalized  intersections  as  a  linked 

system.  The  only  specific  costs  are  the  manpower  and  computing  necessary  to 

prepare  the  signal  settings. 

Although  an  " active "  approach  to  benefit  buses  at  an  isolated  intersection 

has  been  shown  in  the  literature  review.  Chapter  II,  there  is  no  evidence  to 


. 

. 


suggest  that  such  a  scheme  would  likely  be  beneficial  in  a  network  of 

signalized  intersections.  It  is  suspected  that  the  total  delays  within  the  network 

would  increase  because  of  the  frequent  interruption  of  the  signal  settings  in  a 
demand-responsive  system.  It  appears  that  the  fixed-time  scheme  under  the 
" passive "  approach  is  a  proven  method  to  give  buses  priority  in  a  network  of 
signalized  intersections. 

It  appears  that  the  timing  plan  for  the  "after"  case  in  this  study  was 
governed  by  the  auto  traffic.  The  cause  was  the  low  bus  volume  in  the  study 
section  and  perhaps  an  inadequate  value  assigned  to  the  bus  delay  weighting.  In 

the  study  section,  which  was  located  in  the  fringe  area  of  the  CBD,  the  bus 
flow  is  only  50  buses  per  hour.  However,  the  bus  flow  in  some  areas  within 

the  CBD  is  as  high  as  120  buses  per  hour.  This  high  volume  of  buses  may 
cause  the  BUS  TRANSYT  program  to  produce  a  signal  timing  plan  favouring  the 

bus  movement.  Moreover,  the  bus  delay  weighting  may  also  be  assigned  a  value 
of  30  or  higher  which  would  result  in  a  significant  improvement  to  bus 
progression.  Nevertheless,  the  effect  on  other  traffic  would  have  to  be  studied 
in  detail.  It  is  recommended  that  the  investigation  of  these  two  cases  to  be 

carried  out  in  some  studies. 

In  the  cyclic  flow  profile  survey,  it  appears  that  a  K  value  of  50, 

employed  to  modify  the  smoothing  factor  in  the  platoon  dispersion  formula,  was 
an  appropriate  number  for  the  morning  peak  traffic.  It  appears  that  the 
difference  between  the  measured  and  predicted  cyclic  flow  profiles  during  the 

afternoon  peak  was  caused  by,  firstly,  the  wrong  assumption  made  in  plotting 
the  profile  and,  secondly,  the  inappropriate  empirical  parameters  used  in  the 

platoon  dispersion  formula.  There  is  some  reason  to  believe  that  these  two 
parameters  vary  with  roadway  and  traffic  conditions.  It  is  recommended  that  a 
future  study  be  carried  out  in  Edmonton  to  investigate  the  specific  values  for 
the  empirical  parameters  in  the  platoon  dispersion  model. 


. 


Finally,  the  BUSPAS  program  was  in  operation  at  the  time  this  thesis  was 
written.  It  is  recommended  that  a  separate  study  be  carried  out  to  investigate 
the  consequences  of  various  signal  priority  schemes  for  transit  using  the 
BUSPAS  program,  and  to  find  the  best  signal  strategy  for  transit  operation  in 


Edmonton. 


. 
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APPENDIX  I 


Significance  Testing  of  the  Travel  Time  Data  on  107  Avenue 
from  101  Street  to  124  Street 


AM  EASTBOUND 


121 


Routes  3  and  7  (  Diesel  ) 
Route  4  (  Trolley  ) 


n  =  12  x  =  24.11  s  =  2.19 
n  =  11  x  =  23.85  s  =  1.80 


Null  hypothesis  Hq  :  u^  =  Uj 

Alternate  hypothesis  H-j  :  u^  f  Uj 


t 


0 


(  n 


n 


1 


1 


+ 


+ 


n 


2 


x  -  y 


)sx2  +  (  n2  -  1  )s/ 


/l  2  x  11  (12  +11  -2  ) 

J  12+11 


24.11  -  23.85 

y 11  x  2.19*  +  10  x  1.80Z 


=  0.309 


For  95%  confidence 


t.025,  21 


2.080 


>  t 


0 


Therefore,  null  hypothesis  is  accepted. 

That  is,  there  is  no  difference  between  diesel  and  trolley  speeds  at  a 
95%  level . 


I 


122 


AM  WESTBOUND 


Routes  3  and  7  (  Diesel  ) 

n 

=  9 

x  =  27.48 

s  =  2.16 

Route  4  (  Trolley  ) 

n 

=  10 

x  =  26.99 

s  =  2.34 

Null  hypothesis 

Ho 

1  Ud  =  UT 

Alternate  hypothesis 

H1 

:  UD  ^  UT 

=  /9  x  10  (  9  +  10  -  2  ) 
9  +  10 


27.48  -  26.99 


8  x  2.16*  +  9  x  2.34^ 


=  0.472 


For  95%  confidence, 


t.025,  17 


2.110 


> 


t 


0 


Therefore,  null  Hypothesis  is  accepted. 

In  other  words,  there  is  no  significant  difference  between  the 

population  mean  of  the  diesel  buses  and  the  trolley  buses 
running  speeds. 
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AM  EASTBOUND  AND  WESTBOUND 


Eastbound  (  Diesel  +  trolley  )  n  =  23  x  =  23.99  s  =  1.98 
Westbound  (  Diesel  +  trolley  )  n  =  19  x  =  27.22  s  =  2.21 


Null  hypothesis 
Alternate  hypothes 


H 

is 


0  ’  ueast 


H. 


east 


uwest 
^  u  west 


'0 


'23  x  1  9  (  23  +  19  -  2  ) 

23  +  19 


27.22  -  23.99 


22  x  1.982  +  18  x  2. 21 2 


=  4.993 


For  95%  confidence. 


t.025,  40 


2.021 


Since  the  result  is  significant  at  the  5%  level,  the  null  hypothesis 
is  rejected.  That  is,  the  population  mean  of  the  eastbound 
speed  is  not  equal  to  the  westbound  speed. 
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OFF-PEAK 


Since  there  is  no  trolley  buses  running  during  off-peak  hours,  we 
only  considered  the  eastbound  and  westbound  speed. 


EASTBOUND  (  Diesel  ) 
WESTBOUND  (  Diesel  ) 


n  =  20  x  =  26.83  s  =  1.78 
n  =  19  x  =  27.97  s  =  2.53 


Null  hypothesis 
Alternate  hypothesis 


H  :  u  ,  =  u 

o  east  west 


H,  :  u  ,  ^  u  , 

1  east  west 


20  x  19  (  20  +  19  -  2  ) 


20  +  19 


27.97  -  26.83 _ 

1 19  x  1.782  +  18  x  2. 532 


=  1.634 


For  95%  confidence, 
t.025,  37 


2.021 


> 


t 


o 


Therefore,  the  null  hypothesis  is  accepted.  There  is  no  difference 
between  the  population  mean  of  the  running  speed  for  the 
eastbound  and  westbound  movement. 
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PM  EASTBOUND 


Routes  3  and  7  (  Diesel  ) 

Route  4  (  Trolley  ) 

Null  hypothesis 
Alternate  hypothesis 


n  =  12  x  =  25.60  s  =  2.21 
n  =  9  x  =  25.29  s  =  3.23 

Ho  :  UD  =  UT 
H1  :  UD  ^  UT 


=  /12  x  9  (  12  +  9  -  2) 


12  +  9 


_ 25.60  -  25.29 

/n  x  2.212  +  8  x  3.232 


=  0.262 


For  95%  confidence. 


t.025,  19 


2.093 


>  t 
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Therefore,  null  hypothesis  is  accepted.  The  population  mean  of  the 
diesel  running  speed  is  equal  to  the  population  mean  of 
the  trolley  running  speed. 
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PM  WESTBOUND 


Routes  3  and  7  (  Diesel  ) 
Route  4  (  Trol ley  ) 


n  =  10  x  =  24.49  s  =  3.32 
n  =  13  x  =  26.49  s  =  4.07 


Null  hypothesis  Ho  :  UD  =  UT 

Alternate  hypothesis  H-j  :  uQ  f  u-j- 


tQ  =  /IQ  x  13  (  10  +  13  -  2  ) 

10  +  13 


26.49  -  24.49 


9  x  3.322  +  12  x  4.072 


=  1.262 


For  95%  confidence. 


+  025,  21 


2.080 


> 


Therefore,  the  null  hypothesis  is  accepted.  The  population  mean  of 
the  diesel  running  speed  is  equal  to  the  population  mean 
of  the  trolley  running  speed. 
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PM  EASTBOUND  AND  WESTBOUND 


Eastbound  (  Diesel  +  trolley  ) 
Westbound  (  Diesel  +  trolley  ) 


n  =  21  x  =  25.47  s  =  2.62 
n  =  23  x  =  25.62  s  =  3.82 


Null  hypothesis 
Alternate  hypothesis 


Ho  ’  ueast  uwest 
^1  '  ueast  ^  uwest 


=  / 21  x  23  (  21  +  23  -  2  ) 


21  +  23 


25.62  -  25.47 _ 

/ 20  x  2.622  +  22  x  3.822 


=  0.150 


For  95%  confidence. 


*0.025,  42 


2.021 


Again,  the  null  hypothesis  is  accepted.  The  population  mean  of  the 
eastbound  speed  is  equal  to  the  population  mean  of  the 
westbound  speed. 
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APPENDIX  II 


Computer  Output  of  the  BUSPAS  Program 
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APPENDIX  IV 


Listing  of  the  BUSPAS  Program 


1 

2 

3 

4 

5 

6 

7 

8 

9 

1  O 

1  1 

1  2 

1  3 

1  4 

1  5 

1  6 

1  7 

1  8 

1  9 

20 

2  1 

22 

23 

24 

25 

26 

27 

28 

29 

30 

3  1 

32 

33 

34 

35 

3  6 

37 

38 

39 

40 

4  1 

42 

4  3 

4  4 

4  5 

4  6 

4  7 

4  8 

4  9 

50 

5  1 

52 

5  3 

54 

55 

56 

57 

58 

5  9 

60 

6  1 

62 

63 

64 

65 

6  6 

67 

68 

69 

70 

7  1 

72 

73 

74 

75 

76 

77 

78 

79 

80 

8  1 

82 

83 

8  4 

85 

8  6 

87 

88 

89 

90 

9  1 

9  2 

93 

94 

95 

9  6 

97 

9  8 

9  9 

1  00 

1  O  1 

102 

1  03 

1  04 

1  05 

1  06 

107 

108 

109 

1  1  0 

1  1  1 

1  1  2 

1  1  3 

1  1  4 

1  1  5 

1  1  6 

1  1  7 

1  1  8 

1  1  9 

1  20 


PROGRAM  ROSIM 
IMPLICIT  I  NTEGER  ( A  - Z ) 

1 NTEGER*  4  MSEC,  NOUT,  BM,  JTST,  NPER ,  BUS,  TEMP 

INTEGERS  JUN.DET, ENTRY,  JST.  EST,  DST  ,  CARS  ,  D  T  C  N  ,  NSTOP  ,  OUTDAT  ,  COUT 
1MLANE , BLANE , LTH . VELO, DETINT, 

2JNST  ,  DCARS  ,  HIST  ,  SVSTRT (  100)  , 

3MIN , MAX , EXTT .MINGT ,MAXGT , NST , DEMDET , EKTDET , DEM, NOST 
INTEGERS  N  G  R  N (  2  8  ,  4  )  ,  NGREENI  28 , 4  )  ,GRNT(28,4)  ,  GREENT  [ 28  ,  4  ) 
INTEGERS  CHENT(40,4)  ,  CHADEL  (  120,4  )  ,  C  H  A  D  E  R (  120,4) 

I NTEGER*  4  FRCCNG (  28  ,  4  ,  4  )  ,  NSVEX (  28 , 4 ,  4  )  ,  NWGP  ,  NWMX ,  OVTK 
I NTEGER*4  S VDMDT ( 28 , 4 , 2 )  ,SVEXTT(28)  ,  S VEXDT I  28 , 4  ,  6 )  ,SVDEM(28,4)  , 
1  SVMXGT (  28  )  , S  V  MA  X (  2  8  ,  4  )  ,  EXTRGN(  28  ,  4  )  ,EXGN(28,4) 

REAL  *  8  TIM 

DIMENSION  JUN (  75 , 30 )  ,  D  E  T  (  120,  15)  ,DECTR(7S)  ,ENTRY(40,6)  , 

1 JST (  75 )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  , JTST ( 75 )  ,DTCN(75)  , 

2DLY  (  75  )  ,  NS  TOP  (  75 )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3  S  A  T  N (  3  )  ,  C  0  U  N (  5  )  , ©CN ( 3 )  , 

4TLST(28,23)  ,JNST(28)  ,  CHANGE (  28 , 2 )  . 

5  M  L  A  N  E (  6.  8)  ,  BLANE (  6,4)  ,  LTH(75)  ,VEL0(75)  ,  D  E  T I N  T (  120)  , 

6DUMJUN (  4  )  ,  M A S  T  J N  (  4  )  , 

7  M I N (  2  8  ,  4)  ,  MA  X  (  2  8  ,  4  )  ,EXTT(28)  ,MINCT(28)  ,MAXGT(28)  , NST ( 28 , 4 )  , 
8DEMDET (28,4,2) ,EXTDET(28,4,6) ,DEM(28,4) ,N0ST(28) 

COMMON  JUN,  DET  ,DECTR,  ENTRY  ,  JST  ,  DST,  EST  ,  CARS  .MSEC. 
1JTST,DTCN,DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2MLANE , BLANE, LTH, VELO, DETINT, BM. BUS 
COMMON /C0M1 /SATN.COUN.OCN, VLTH, 

1ENDT , RNGE , SPEED , NVEH, UCST , LCST , RN , OOELAY 
C0MM0N/C0M2/TLST , JNST , CHANGE , HFACT , NDUM, DUMJUN , MASTJN , 

1MIN, MAX, EXTT, MINGT, MAXGT, NST, DEMDET.EXTDET, DEM, NOST, NJN, EXT 
COMMON  /BLKSVH/  S V S T ( 1 OO . 1 1 ) , S V D L ( 1 00 , 5 ) , N S P V E H , S T A R T , 

1  SVSTRT  .  I  PR  1  NT 

COMMON  /BLKTIM/  PCHNGE(28) , MNJN , NGRN , NGREEN , GRNT , GREENT 
COMMON  /BLKCMP/  S VDMDT  ,  S VEXTT  ,  SVEXD T  ,  S VMXGT  , S VMAX  ,  SVDEM , 

1  EXTRGN , EXGN , S VEXT , ICOMP, ] CHOP , NNSKI P , 1RUN.FST 
COMMON  /BLKFLO/  CHNO,  T1MCH|4  )  ,CHENT  ,  CHADEL  ,  CHADER ,  NOCHTT 
COMMON  /BLKFCG/  FRCCNG  ,  NS  VEX  ,  NWGP  ,  NWMX 
COMMON  /BLKHST/  DCARS ( 750 ) , H 1ST ( 75 , 20 ) , HST 1 NC 

COMMON  / B  L  K I  /  NSTRT (  40 )  ,  SUMN  |  40 )  ,SNS0(4O)  ,  TNSTRT (  40 )  ,  TSUMN  (  40 )  , 
1  TSNSO ( 40 ) , NM ( 40 ) 

COMMON  /BLKTKE/  OVTK( 120) 

COMMON  /BLKMLT /  ENTT(20,5) 


1  002 
1  003 
1  008 
10  11 

1023 

1024 

1025 
1  1  OO 


FORMAT ( 
FORMAT ( 
FORMAT ( 
FORMAT ( 
FORMAT ( 
FORMAT ( 
FORMAT ( 
FORMAT ( 


1 


) 


MSEC  = ' , G8 ) 


G  1  O  .  1  , 

'  ) 

T20, 'TIME  *  , G lO ) 

T20 ,  'JUNCTION'  ,T32,  'DELAY'  ) 
T16,G10,T27,G10) 

'MAXIMUM  VEHICLES  IN  SYSTEM' 
T  2  O  ,  '  RANDOM  NUMBER',  G10) 


G  1  O  ) 


READ  IN  DATA  FOR  DECISIONS  AND  LIGHTS 
CALL  READ 
NN  =  COUN (  2  ) 

READ  IN  TRAFFIC  LIGHTS  DATA 
CALL  TREAD 
CALL  VAREAD 
WR  I TE (  6  .  1008) 

WR I TE ( 6 , 1 008 ) 


READ  IN  DATA  FOR  COUNT  OF  CARS  AT  ENTRY 
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N  1  s  COUN (  2  ) 

C  READ  IN  DATA  FOR  SPECIAL  VEHICLES 

CALL  SSVH(NI) 

C  READ  IN  SPECIAL  VEHICLE  DETECTOR  DATA. 

CALL  S VREAD ( NDEMD ) 

CALL  DATA (  COUN (  1  )  ,C0UN(2)  ,C0UN(3)  ,C0UN(5)  ) 
CALL  GRAPHS ( COUN ( 1 ) ) 

C  CALL  STX  I  T 

WR  I TE (  6  ,  1 002 ) 

C  CALL  COMENT ( ' ROS I M5 ' ) 

C  CAL  L  CLOCK  1 

MSEC  r  1 
TEMP  s  TEMP  +  1 

Y  =  O 


C  . - . 

C  START  OF  MAIN  CYCLE 

C  START  RUNNING  THROUGH  TRAFFIC  LIGHTS  DATA 

C  CALL  C  L  0  C  K (  TIM) 

C  WR I TE { 6 , 1 003 )  TIM, MSEC 

WR  1 TE (  6 . 2003  )  MSEC 
2003  FORMAT  ('  MSEC  s  'rC8) 

12  CALL  VACT 

C  SPECIAL  VEHICLE  PRIORITY  ROUTINE. 

CALL  SVACT(NDEMD) 

CALL  T  L I GHT 

C  INITIATE  SPECIAL  VEHICLES 

CALL  I S VH 
CALL  GRAPH1 


C  . 

C  START  RUNNING  THROUGH  JUNCTION  DATA 

16  CALL  JMWO 1 


C  . 

C  START  RUNNING  THROUGH  DETECTOR  DATA 

CALL  DMW01 


C  START  RUNNING  THROUGH  ENTRY  AND  EXIT  DATA 

CALL  FLOCH 
CALL  EMW01 
CALL  D 1 


C 


I F ( NPER . EO . O ) CO  TO  2778 
DO  922  ]:1,NPER 

I F ( (MSEC . GE  COUT ( 1 , 1 ) )  AND. (MSEC.LE.COUT(I 
922  CONTINUE 

GO  TO  2778 

822  WR 1 TE  (  6  ,  1 O 1  1  )  MS  E  C 
WR I TE ( 6 , 1 008 ) 

DO  722  J  s  1  , NOUT 
WR  I TE (  6  ,  1 008  ) 

A  =  OUTDAT (  J ,  1  ) 

B  =  OUTDAT  (  J ,  2 ) 

C  =  OUT  DAT ( J ,  3 ) 

CALL  OUT ( A , B , C ) 

722  CONTINUE 
GO  TO  922 

C9022  CALL  CLOCK (TIM) 

9022  TEMP  s  TEMP  -  500 

C  WR I TE ( 6 , 1 003 )  T I M , MS E C 

WR I TE ( 6 , 2003 )  MSEC 
2778  IF  (TEMP  -  500)  823,9022,9022 


2 


GO  TO  822 


. 


1  2  1 

1  22 

1  23 

1  24 

125 

1  26 

1  27 

1  2  S 

1  29 

1  30 

1  3  1 

1  32 

1  33 

1  34 

1  35 

1  36 

1  37 

1  36 

1  39 

1  40 

1  4  1 

1  42 

1  4  3 

1  4  4 

1  4  5 

1  4  6 

1  47 

1  46 

1  4  9 

1  50 

1  5  1 

1  52 

1  53 

1  54 

1  55 

1  5  6 

1  57 

1  56 

1  59 

1  60 

1  6  1 

1  62 

1  63 

1  64 

1  65 

1  6  6 

1  67 

1  66 

1  69 

1  70 

1  7  1 

1  72 

173 

1  74 

1  75 

1  7  6 

177 

1  78 

179 

1  80 

1  8  1 

1  62 

1  83 

1  84 

1  85 

1  8  6 

1  87 

1  86 

1  89 

1  90 

1  9  1 

1  9  2 

1  9  3 

1  9  4 

1  95 

1  9  6 

1  97 

1  9  8 

1  99 

200 

20  1 

202 

203 

204 

205 

206 

207 

208 

209 

2  1  0 

2  1  1 

2  1  2 

2  1  3 

2  1  4 

2  1  5 

2  1  6 

2  1  7 

2  1  8 

2  1  9 

220 

22  1 

222 

223 

224 

225 

226 

227 

228 

229 

230 

23  1 

232 

233 

234 

235 

236 

237 

238 

239 

240 


823  MSEC  =  MSEC  ♦  1 
TEMP  s  TEMP  ♦  1 
I F ( MSEC  .EO . ENDT ) CO  TO  23 
GO  TO  12 

C  23  CALL  COMENT ( ROS 1 M7 ) 

C  23  CALL  CLOCK (TIM) 

C  WR I TE ( 6 , 1 003 )  T  I  M , MS E C 

23  WR I TE ( 6 , 2003 )  MSEC 
CALL  02 
CALL  SPV3 

WR  I TE (  6  .  1  025  )  L  CS  T 

STOP 

END 

SUBROUTINE  DMW01 
C  DETECTOR  DECISION  ROUTINE 

IMPLICIT  I  NTEGER l A  -  2 ) 

I NTEGER*4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGERS  JUN ,  DET  ,  ENTRY  ,  JST  ,  EST  ,  DST  ,  CARS  ,  DTCN  ,  NSTOP  ,  OUTDAT  ,  COUT  , 
1MLANE ,  BLANE ,  LTH ,  VELO  ,  DET I  NT  ,  DCARS  ,  HIST ,  OVTK 
R  E  A  L  *  8  TIM 

DIMENSION  J  U  N (  7  5 , 3  O )  ,DET(  120,  15)  ,DECTR(75)  ,  ENTRY  (  40,  6)  , 

1 J  S  T  (  7  5  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(7S)  , 

2  D  L  Y  (  7  5  )  ,  NSTOP ( 75  )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3SATN(3)  ,  C  0  U  N (  5  )  ,0CN(3)  , 

4MLANEI6,  8)  ,BLANE(6,4)  ,LTH(75)  ,VEL0(75)  ,  D  E  T I N  T (  120) 

COMMON  JUN.  DET.  DECTR,  ENTRY,  JST,  DST,  EST,  CARS,  MS  EC, 

1JTST,  DTCN,  DLY,  NSTOP,  OUTDAT,  COUT,  NOUT,  NPER, 

2MLANE,  BLANE,  LTH,  VELO,  DETINT,  BM,  BUS 
COMMON/ COM 1  / S  A  T  N  ,  COUN.QCN.VLTH, 

1 ENDT , RNGE .SPEED , NVEH , UCST , LCST , RN , ODELAY 
COMMON  /BLKHST /  DCARS  [  750  )  ,  H I  ST  (  75 , 20  )  ,  HST I NC 

1  P  L  =  O 

2  PL  :  PL  +  1 
GO  TO  5 

3  I F (  P L  .  EO  .  COUN ( 2  )  )  GO  TO  4 
GO  TO  2 

4  RETURN 

5  DRCN  =  O 
DRCNB  =  O 
DRCNL  =  O 
DRCNR  =  O 
V VE  L  s  O 

F  V  EH  =  O 
LVEH  =  O 
COUNT  =  O 
CCNP  s  O 
TYPE  =  O 
TYPET  =  O 
DET  I  NT (  PL  )  sO 
BM:  o 

TYPER  =  O 
T YPEL  =  O 
TYPEB  =  O 
DECT  r  O 
DECR  =  O 
DECL  =  O 
DECB  =  O 
NS  L  sO 
NS  L  R  s  o 
NSLL  s  o 


NS  L  B  s  o 
BCOUNT  sO 
SVCN  s  o 

MARK  t  o 

TYPE  s  DET(PL.IO) 

I F ( DET ( PL , 2 ) . EO . O )  GO  TO  29 
TYPET  s  DET  ( PL , 12) 

DECT  s  DET ( PL , 3 ) 

I F ( T YPET . EO . 1 ) GO  TO  6 
VOUE  =  DET ( DECT , 6 ) 

TEMP  1  s  DET  (  DECT  ,  3  ) 

TEMP  2  =  DET (  DECT  ,12) 

I F ( TEMP2 . EO . 1 ) GO  TO  8 
7  TEMP2  =  DET (  TEMP  1,12) 

TEMP  1  s  DET (  TEMP  1,3) 


I F  (  TEMP  2  NE  .  1  )  GO  TO 

7 

8 

NS  L  =  TEMPI 

GO  TO  9 

6 

VOUE  s  JUNIDECT, 
NS  L  =  DECT 

24  ) 

9 

TEMP  s  DET (  P  L  ,  5  ) 
I F  ( JUN ( NSL , 12) ) 

60  , 

60,61 

60 

I F  (  JUN (  NS  L  ,  1  3  )  ) 

62  , 

62,61 

62 

I  F  (  JUN (  NSL  ,  1  4  )  ) 

63  , 

63,61 

63  NUMCR  s  DET  (  P  L  ,  1 4  ) 
GO  TO  82 


6 1  NUMCR  =  DET (PL, 15) 

82  DEOU  s  NUMCR  -  VOUE 
AVEH  =  DET(PL, 1 ) 

LOU  s  DET ( P  L  ,  5 )  ♦  1 

I F ( TYPE -7)11,100, 200 

11  CARS  (AVEH,  1  )  s  CARS  (AVEH,  1  )  -  1 

12  I F ( CARS ( AVEH , 1 ) . LE . O )  GO  TO  16 

13  I F (  F VEH  .  EO  . O )  GO  TO  15 
CARS (LVEH, 4)  s  AVEH 

14  LVEH  =  AVEH 

CCNP  s  CCNP  +  1 

I F ( CARS ( AVEH , 4 ) . EO . O )  GO  TO  29 
AVEH  s  CARS ( AVEH , 4 ) 

CARS ( L VEH , 4 )  =  O 

GO  TO  11 

15  FVEH  s  AVEH 
GO  TO  14 

16  COUNT  s  COUNT  ♦  1 

LOU  s  LOU  -  1 

IF  ( CARS ( AVEH , 3 ) . L T . O . AND . LOU . GT . O )  BCOUNT  s  BCOUNT  ♦  1 

I F (  l  CARS ( AVEH ,  1  ) ♦ 1  )  .  EO  .  O  )  NSTOP(NSL)  s  NSTOP(NSL)  ♦  1 

17  I  F (  T YPE - 7 )  1 8  ,  1 50 . 250 

18  I F (  TYPE  .  EO  .  6  .  AND  .  CARS  (  AVEH ,  3  )  .  L T  .  O  )  GO  TO  320 

318  DEOU  =  DEOU  -  1 

50  IF  (DEOU.LT.O)  GO  TO  34 

19  DRCN  s  DRCN  ♦  1 

I  F (  CARS  ( AVEH ,  3 )  .  L E  O ) GO  TO  20 
V VE  L  s  CARS ( AVEH ,  3  ) 

CO  TO  21 

20  VVEL  s  -  CARS  ( AVEH ,  3  ) 

SVCN  s  SVCN  ♦  1 

2 1  J  *  DET ( PL  .  4  )  /  VVEL 

K  t  (  ( D  E  T ( P  L  ,  4  )  -  J* VVEL  )»  lOOOO ) /VVEL 

RNS  s  CGUBFS ( 1 OOOO )  +  1 


. 


- 


2  4  1 

242 

24  3 

244 

245 

24  6 

24  7 

2  4  & 

249 

250 

25  1 

252 

253 

254 

25  5 

256 

257 

258 

25  9 

260 

26  1 

2  62 

263 

264 

2  65 

266 

267 

2  68 

269 

270 

27  1 

272 

273 

274 

275 

276 

277 

278 

279 

280 

28  1 

282 

283 

28  4 

285 

286 

287 

288 

289 

290 

29  1 

29  2 

29  3 

29  4 

29  5 

29  6 

29  7 

29  8 

29  9 

300 

30  1 

302 

303 

304 

305 

306 

307 

308 

309 

3  1  0 

3  1  1 

3  1  2 

3  1  3 

3  1  4 

3  1  5 

3  1  6 

3  1  7 

3  1  8 

3  1  9 

320 

32  1 

322 

323 

324 

325 

32  6 

327 

328 

329 

330 

33  1 

332 

333 

334 

335 

336 

337 

338 

339 

340 

34  1 

34  2 

343 

344 

345 

34  6 

347 

348 

349 

350 

35  1 

352 

353 

354 

355 

35  6 

357 

358 

359 

360 


J  ♦  1 


IF(K.GT.RNS)  J  s 
CARS  (  AVE  H  ,  1  )  t  J 
MARK  =  1 

DECX  =  DECT 
NSLX  =  NSL 
TYPEX  s  TYPET 

22  I F ( CARS ( AVEH . 3 ) . L E  0 )  GO  TO  31 

23  IF|  TYPEX  .  NE  .  1  )  GO  TO  26 

I F ( JUN ( DECX , 2 ) . EO  O )  GO  TO  25 
NC AR  s  JUN ( DECX , 2 ) 

C ARS ( NCAR , 4 )  s  AVEH 

24  NCAR  s  CARS l AVEH , 4 ) 

JTST(DECX)  s ■ JTST(DECX)  ♦  CARS(AVEH.I) 
:  O 
AVEH 


JUN ( DECX , 24 )  ♦  1 


CARS ( A VEH , 4 ) 

JUN ( DECX . 2 ) 

AVEH  =  NCAR 
JUN ( DECX , 24 ) 

I F ( AVEH . EO . O )  GO  TO  29 
GO  TO  11 

25  JUN ( DECX  ,  1  )  s  A VEH 
GO  TO  24 

26  I  F (  DET (  DECX ,  2 )  . EO . O )  GO  TO  28 
NCAR  =  DET ( DECX , 2 ) 

CARS ( NCAR , 4 )  =  AVEH 

27  NCAR  r  CARS ( AVEH , 4 ) 

JTST(NSLX)  =  JTST(NSLX)  +  CARSl AVEH, 1 ) 

CARS  (  A VEH  ,  4  )  =  O 

DET (  DECX  .  2  )  =  AVEH 


AVEH  =  NCAR 
DET ( DECX , 6 ) 
IF(AVEH.EO.O)  GO  TO  29 
GO  TO  11 


DET  (  DECX  ,  6  )  *■  1 


28  DET ( DECX , 1 ) 
GO  TO  27 

29  DETIPL  ,  1  ]  s 

DET (PL,2)  = 

DET(PL  ,  6)  = 

DET (  P  L  ,  7  )  = 


=  AVEH 


3  1 


F  VEH 
L  VEH 
CCNP 
DRCN 

I F ( TYPE . NE . 2 )  GO  TO  30 
DET  I  NT  |  P  L  )  : DRCN  +  S VCN*  1O0 

IFIDETINT(PL)  .EO.O.AND  .COUNT  GT.O)  DETINT(PL)  s  20 

IF  ( S VCN  .  EO  .  O  . AND  .  BCOUNT  .  GT  O)  DET ] NT |  P L  )  : DET I  NT |  P l  ) +2000 

GO  TO  40 

IF  ( TYPE . NE . 5 )  GO  TO  40 
DET  1  NT  (  P  L  )  = S VCN*  1  OO 

IF(DETINTIPL).  EO.O.AND.  BCOUNT.  GT  .  O ) DET I  NT  ( P L )  : 2000 
GO  TO  40 
X  =  2 

1 F  (  TYPET  .EO.  1  ) X :  1 

CALL  S VEH (  2  .  P L  , AVEH  ,  X  ,  DECT  ) 

GO  TO  23 


33  DCARS  ( AVEH  ) 

GO  TO  13 

34  DCARS (A VEH) 

GO  TO  13 

35  DCARS (AVEH) 

GO  TO  13 

3  6  DCARS  ( A VEH ) 

GO  TO  13 

40  I  F  (  T YPET  .  NE  .  1  )  GO  TO  41 


DCARS  (  A VEH  )  ♦ 


DCARS ( AVEH )  ♦  1 
DCARS ( A VEH )  +  1 


DCARS ( AVEH )  +  1 
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DTCN(NSL)  =  DTCN(NSL)  +  DRCN 

41  I F ( TYPEB  NE  1 ) GO  TD  42 

DTCN(NSLB)  =  DTCN(NSLB)  +  DRCNB 

42  I F ( TYPER . NE  1 ) GO  TO  43 

DTCN(NSLR)  s  DTCN(NSLR)  +  DRCNR 

43  I  F  (  T YPE  L  .  NE  1  ) CO  TO  3 

DTCN(NSLL)  =  DTCN(NSLL)  +  DRCNL 

GO  TO  3 

100  PLACE  s  DETIPL, 11) 

TYPEB  =  BL ANE I  PLACE  ,  2  ) 

DECB  :  BLANE | PLACE , 1 ) 

IFITYPEB.EC.1l  GO  TO  103 
VOUEB  =  DET ( DECB , 6 ) 

TEMP  1  =  OETI DECB ,  3 ) 

TEMP2  =  DET ( DECB ,12) 

IFITEMP2.EC.1l  GO  TO  102 

101  TEMP2  =  DET I  TEMP  1  ,  1 2 ) 

TEMP  1  :  DET( TEMP  1,3) 

IFITEMP2.NE.1)  GD  TO  101 

102  NS  L  B  =  TEMP  1 
GO  TO  104 

103  VOUEB = JUN I DECB . 24 ) 

NSLB  s  DECB 

104  TEMP  s  B L ANE I P L ACE , 4 ) 

NUMCRB  =  ( BLANE ( PLACE , 3 ) »TEMP ) /VLTH 

IF  (  JUN I  NS L B  ,  1  2  )  )  65.  65,66 

65  IF  (  JUN  I  NS L B  ,  1  3  )  )  67,67,66 

67  IF  (  JUN I  NS L B  ,  1 4  )  )  68,66.66 

66  NUMCRB  =  (NUMCRB  +  1  ) / 2 

68  DEOUB  r  NUMCRB  -  VOUEB 
GO  TO  11 

ISO  I F ( CARS ( AVEH , 3 ) . GT . O )  GO  TO  18 
DEOUB  r  DEOUB  -  1 

51  IF  IDEOUB  LT.O)  GO  TO  33 
DRCNB  r  DRCNB  ♦  1 

VVEL  =  -  CARS  ( AVEH ,  3  ) 

J  :  B L ANE { P L ACE , 3 ) / VVE L 

K  :  (I  B LANE (  PLACE  ,  3  )  ■  J *  V V E L  )  *  1 OOOO )  / V V E L 

RNS  =  GGUBFS  I  1 OOOO )  +  1 

IF(K.GT.RNS)  J  :  J+1 

CARS  I AVEH ,  1  )  t  J 
X  =  2 

IF (  TYPEB  .  EC  .  1  ) X  =  1 

CALL  SVEH ( 2 , PL . AVEH , X , DECB ) 

MARK  =  2 

DECX : DECB 
NSLX  :NSLB 
TYPEX  =  TYPEB 
GO  TO  23 

200  PLACE  r  DET ( PL , 1 1 ) 

TYPEL  =  ML ANE ( PL  ACE ,  2 ) 

DECL  =  ML ANE I  PLACE  ,  1  ) 

TYPER  s  MLANE I  PLACE ,  6 ) 

OECR  :  MLANE ( PLACE , 5 ) 

I F ( TYPE L . EO . 1 )  GO  TO  203 
VOUEL  «  DET ( DECL , 6 ) 

TEMP  1  =  DET | DECL  ,  3 ) 

TEMP2  *  DET I DECL . 12) 

1 F ( TEMP2 . EO  1 ) GO  TO  202 

201  TEMP2  s  DET ( TEMP  1  ,  1 2 ) 


' 


*  *  .* 


36  1 
3  62 

363 

364 

365 

366 

367 
3  66 

369 

370 

37  1 

372 

373 

374 

375 

376 

377 

378 

379 

380 

38  1 

382 

383 

384 

385 
38  6 

38  7 

388 

389 

390 

39  1 
39  2 
39  3 
394 
39  5 
39  6 
39  7 

39  8 

3  9  9 
400 

40  1 

402 

403 

404 

405 

406 

407 

4  08 
409 
4  1  0 
4  1  1 
4  1  2 
4  1  3 
4  1  4 
4  1  5 
4  1  6 
4  1  7 
4  1  6 
4  1  9 
4  20 


42  1 
4  22 
423 
4  24 
4  25 

426 

427 
4  28 
4  29 
4  30 

43  1 
4  32 
433 
4  34 
4  35 
436 
4  37 
4  38 

439 

440 

44  1 
442 
44  3 
4  4  4 
4  45 
4  4  6 

44  7 
4  4  8 
449 
4  50 

45  1 
4  52 
453 
4  54 
455 
45  6 

457 

458 

459 
4  60 
4  6  1 
4  62 
4  63 
4  64 
4  65 
4  6  6 
4  67 
4  68 
4  69 
4  70 
47  1 

472 

473 

474 

475 
4  7  6 
477 
4  78 
4  79 
480 
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J  S  MLANE ( PLACE . 7 ) / VVEL 
RNS  2  GGUBFS ( 1 0000 )  ♦  1 

K  s  ( ( ML ANE ( PLACE , 7 )  -  J* VVEL )* 1 OOOO ) /VVEL 

IFIK.GT . RNS )  J  2  J  +  1 

CARS (AVEH, 1 )  2  J 

I  F  (  CARS  (  A VEH  ,  3 )  .  GT  .  O )  GO  TO  254 
X  2  2 

I F |  TYPER  .  EC  .  1  ) X  2  1 

CALL  S VEH ( 2 , P L , A VEH ( X , DECR ) 

254  MARK  =  4 

DECX  2  DECR 
NSLX  2  NSLR 
TYPEX  2  TYPER 
GO  TO  23 

320  CALL  SVNO(AVEH.PL) 

I F ( BM , EC . O ) GO  TO  318 
COUNT  =  COUNT  -  1 

BCOUNT  =  BCOUNT  -  1 
GO  TO  13 
END 

SUBROUTINE  CMPN ( JN ,  I  CAL L  ,  NSKI P  ,  CHOP  ) 

IMPLICIT  INTEGER ( A  -  2 ) 

I NTEGER*  4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

I NTEGER*4  JUN , DET , ENTRY ,  JST , EST ,  DST  ,  CARS  ,  DTCN ,  NSTOP ,  OUTDAT ,  COUT , 
1MLANE , BLANE , LTH, VELO, DETINT, 

2 JNST , 

3MI N , MAX , EXTT , MI NGT , MAXGT , NST , DEMDET , EXTDET , DEM, NOST 
INTEGERS  S  V  DMDT (28,4,2)  ,SVEXTT(28)  , S VEXDT  I  28 ,  4  ,  6 )  ,SVDEM(28,4)  , 

1  SVMXGT (  28 )  , S  V  MA  X (  2  8 ,  4  )  ,  EXTRGNl  28 , 4  )  ,EXGN(28,4) 

RE AL  *  8  TIM 

DIMENSION  JUN(75,30)  ,  D  E  T (  120,  15)  ,DECTR(75)  ,  ENTRY ( 40 , 6)  , 

1 JS  T ( 7  5  )  ,  DS  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 

2  D  L  Y ( 7  5 )  ,  N  S  T  0  P ( 7  5  )  ,  OUTDAT(  12,3)  ,C0UT(5,2)  , 

3  S  A  T  N (  3 )  ,  C  0  U  N ( 5  )  ,QCN(3)  , 

4TLST(28,23) ,JNST(28) ,CHANGE(28,2) , 

5ML ANE (6,8)  ,BLANE(6,4)  ,LTH(75)  ,VEL0(75)  ,  D  E  T 1 N  T (  120), 

6DUMJUN (  4  )  , MAS  T  J  N (  4)  , 

7  M  I  N  (  2  8  ,  4  )  , MA  X (  2  8  ,  4  )  ,EXTT(28)  ,MINGT(28)  ,MAXGT(28)  ,NST(28,4)  , 
8DEMDET(28,4,2) ,EXTDET(28,4,6) ,DEM(28,4) ,N0ST(28) 

DIMENSION  I  COMP (  28 )  .  ICH0P(28)  ,NNSKIP(28)  ,  I  RUN (  28 )  ,FST(28) 

COMMON  JUN  ,  DET  ,  DECTR ,  ENTRY  ,  JST  ,  DST  .  EST  ,  CARS  , MSEC  . 

1JTST, DTCN, DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2MLANE.BLANE,  LTH,  VELO,  DETINT.  BM,  BUS 
COMMON /C0M1  / S  A  T  N  ,  COUN.OCN,  VLTH, 

1ENDT.RNGE, SPEED,  NVEH,  UCST,  LCST  ,  RN  ,  ODE  LA Y 
COMMON /C0M2/TLST , JNST , CHANGE , HFACT , NDUM, DUMJUN , MAST JN , 

1MIN, MAX,  EXTT, MINGT. MAXGT.  NST,  DEMDET,  EXTDET,  DEM.  NOST,  NJN,  EXT 
COMMON  /BLKCMP/  SVDMDT , SVEXTT , SVEXDT . SVMXGT , SVMAX , SVDEM, 

1  EXTRGN  ,  EXGN , SVEXT  ,  ICOMP,  I  CHOP  ,  NNSKI P  ,  IRUN.FST 
K  2  NOS  T (  JN ) 

C  ICALL  s  1  IF  THIS  CALL  IS  TO  SET  UP  COMPENSATION. 

IF  (1  CALL  )  1,1,2 

C  CHOP  2  O  OR  THE  NUMBER  OF  THE  CURTAILED  STAGE 

2  IF  (CHOP)  3,3,4 

C  IF  CHOP  x  O  REPLACE  IT  BY  THE  NEXT  STAGE. 

3  RST  r  TLST ( JN ,  1  ) 

CHOP  s  NST ( JN  .  RS  T  ) 

C  IF  CHOP  AND  NSK1P  ARE  BOTH  ZERO  NO  COMPENSATION  IS  NEEDED 
IF  (NSK1P)  10,10,7 
5  RETURN 


TEMP  1  2  DET (  TEMP  1,3) 

I F ( TEMP2 . NE . 1) CO  TO  201 

202  NSLL  2  TEMPI 
GO  TO  204 

203  VOUEL  2  JUN (  DECL  ,  24  ) 

NSSL  2  DECL 

204  TEMP  2  ML ANE ( P L ACE , 4 ) 

NUMCRL  2  ( MLANE ( PLACE . 3 ) *TEMP ) /VL TH 

IF  ( JUN ( NS L L . 1 3 ) )  69,69,70 

69  IF  (  JUN (  NS L L  ,  1 2  )  )  71,71,70 

71  IF  ( JUN ( NS L L , 1 4 ) )  72,72,70 

70  NUMCRL  =  (NUMCRL  ♦  1)/2 

72  DEOUL  2  NUMCRL  -  VOUEL 

205  IFITYPER.EO. 1 )G0  TO  208 
VOUER  =  DET ( DECR , 6 ) 

TEMP  1  2  DET (  DECR .  3  ) 

TEMP2  =  DET I DECR ,12) 

I F ( TEMP2 . EO  1 )  GO  TO  207 

206  TEMP2  =  DET ( TEMP  1  .  1 2 ) 

TEMP  1  2  DET  (  TEMP  1,3) 

I F ( TEMP2 . NE  1 ) GO  TO  206 

207  NSLR  2  TEMPI 
GO  TO  209 

208  VOUER  =  JUN(DECR,24) 

NSLR  2  DECR 

209  TEMP  2  ML ANE ( P L ACE , 8 ) 

NUMCRR  2  ( ML ANE ( PLACE , 7 ) *TEMP ) / VLTH 

IF  ( JUN ( NS L R , 1 4 ) )  73,73,74 

73  IF  ( JUN ( NS L R , 1 2 ) )  75,75,74 

75  IF  ( JUNINSLR, 13) )  76,76,74 

74  NUMCRR  2  (NUMCRR  +  1)/2 

76  DEOUR  =  NUMCRR  -VOUER 
GO  TO  11 

250  I F ( CARS ( A VEH , 2 )  -  2)18,251,253 

251  I  F  ( DECL  .  EO  .  DECT  . AND  .  TYPEL  .  EO  .  TYPE  ) GO  TO  18 

DEOUL  2  DEOUL  -  1 

52  IF  (DEOUL. LT.O)  GO  TO  35 

DRCNL  s  DRCNL  «■  1 

VVEL  2  CARS ( A VEH , 3 ) 

I  F  (  VVEL  .  LE  .  O ) VVEL  =  -VVEL 
J  2  ML ANE ( P LACE , 3 ) /VVEL 

K  2  ( ( ML ANE ( PLACE ,3) -  J  *  V  V  E  L )  * lOOOO) /VVEL 
RNS  2  GGUBFS ( 1 OOOO )  ♦  1 

IF(K.GT.RNS)  J  s  J+1 
CARS  l AVEH  ,  1  )  2  J 

1  F  (  CARS  ( A VEH  ,  3  )  .  GT  . O )  GO  TO  252 
X  =  2 

I  F  (  T YPE  L  . EO  .  1  ) X  2  1 

CALL  SVEH ( 2 , PL , AVEH , X , DECL ) 

252  MARK  =  3 

DECX : DECL 
NSLX  2  NSLL 
TYPEX  2  TYPEL 
GO  TO  23 

253  I F ( DECR . EO . DECT . AND . TYPER . EO . TYPE ) GO  TO  18 
DEOUR  =  DEOUR  -  1 

53  IF  (DEOUR. LT.O)  GO  TO  36 
DRCNR  2  DRCNR  +  1 

VVEL  s  CARS  (  AVEH  ,  3  ) 

I F ( VVEL . LT . O ) VVEL  2-VVEL 


. 


48  1 

482 

483 

484 

485 

48  6 

4  8  7 

488 

489 

4  9  0 

4  9  1 

4  9  2 

4  9  3 

4  9  4 

495 

4  9  6 

4  9  7 

4  9  8 

499 

500 

50  1 

502 

503 

504 

505 

506 

507 

508 

509 

5  1  0 

5  1  1 

5  1  2 

5  1  3 

5  1  4 

5  1  5 

5  1  6 

5  1  7 

5  1  6 

5  1  9 

5  20 

52  1 

522 

523 

5  24 

525 

526 

527 

528 

529 

5  30 

53  1 

532 

533 

5  34 

535 

536 

537 

538 

539 

540 

54  1 

542 

543 

544 

545 

54  6 

547 

548 

549 

550 

55  1 

552 

553 

554 

555 

55  6 

557 

558 

559 

5  60 

5  6  1 

5  62 

563 

5  64 

5  65 

5  6  6 

567 

5  68 

5  69 

570 

57  1 

572 

573 

574 

575 

57  6 

577 

578 

579 

580 

58  1 

582 

583 

584 

585 

586 

587 

5  88 

589 

590 

59  1 

592 

593 

594 

595 

59  6 

597 

5  9  8 

5  9  9 

600 


4  NS  K  I  P  =  NS K  I  P  ♦  1 

7  I  COMP  (  JN):1 

] CHOP ( JN ) r CHOP 
CHOP  =  O 

NNSK 1 P  (  JN )  =  NSK I P 

C  INHIBIT  CHOPPING  OR  SKIPPING  OF  ALL  STAGES 
DO  8  ST:  1  ,  K 

8  EXTRCN ( JN  , ST  }  =  - E X G N (  J N  .  S T  )  * E X G N (  J N  ,  S T  ) 

1  NEWS  T  s  CHANGE  I  JN  #  1  ) 

C  START  OF  A  NEW  CYCLE'’ 

IF  ( NEWST -FST ( JN ) )  5,9,5 

9  IF  (1  COMP (  JN  )  )  10,10,11 

C  IF  SO  IS  THIS  THE  START  OF  THE  COMPENSATION  CYCLE  OR  THE  START  OF 
C  THE  FOLLOWING  CYCLE'’ 

C 

C  COMPENSATION  CYCLE  FINISHED  -  ALLOW  PRIORITY  CALLS. 

10  DO  12  ST  s  1  ,  K 

1 2  EXTRGN ( JN . ST ) sO 
RETURN 

C  SET  UP  EXTRA  GREEN  FOR  THE  COMPENSATED  STAGES 
1  1  I  COMP (  JN )  SO 
SS  T  s  I  CHOP  (  JN ) 

SK I P  s  NNSK I P ( JN  ) 

DO  13  ST  s  1  ,  SK  I  P 

EXTRGN ( JN , SST ) =EXGN(JN,SST) 

13  SS  T  =  NS  T ( JN  , SST  ) 

C  RESET  THE  COUNTER. 

I  RUN (  JN )  s  K 

RETURN 

ENO 

SUBROUTINE  TL1GHT 
IMPLICIT  INTEGER  (A-Z) 

INTEGERM  MSEC,  JTST,  NOUT,  NPER.  BM,  BUS 

INTEGER*^  JUN , DET , ENTRY , JST , EST , DST , CARS , DTCN , NSTOP , OUTDAT , COUT , 
1MLANE , BLANE , LTH , VELO , DETINT , 

2 JNST , LASTST 
RE AL  *  8  TIM 

DIMENSION  J  U  N (  7  5 , 3  O )  ,  D  E  T (  120,  15)  ,DECTR(75)  ,  ENTRY (  40 , 6)  , 

1 JST (  75  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST{75)  ,DTCN(75)  , 

2DLYI75)  ,NST0P(75)  ,OUTDAT(  12,3)  ,C0UT|5,2)  , 

3  S  A  T  N (  3  )  ,  C  0  U  N (  5  )  ,0CN(3)  , 

4TLST ( 28,23) ,JNST(28) , CHANGE ( 28 , 2 ) , 

5MLANEI  6,8)  ,BLANE(6,4)  ,LTH(75)  ,VEL0(75)  ,  D  E  T I N  T (  120)  , 

6DUMJUN (  4  )  ,  MA  S  T  J  N (  4  )  ,  LASTST(28)  , 

7  M I  N  (  2  8  ,  4  )  , M A  X  l  2  8  ,  4  )  ,EXTT(28)  ,M1NCT|28)  ,MAXGT(28)  ,NST(28,4)  , 
8DEMDET (28,4,2)  ,  EXTDET  (28,4,6)  .DEMI28.4)  ,N0ST(28) 

COMMON  JUN,  DET,  DECTR,  ENTRY,  JST, DST,  EST.  CARS, MS  EC, 

1  JTST  ,  DTCN  .  DLY  ,  NSTOP  ,  OUTDAT  .  COUT  ,  NOUT  ,  NPER , 

2MLANE  .BLANE,  LTH,  VELO,  DETINT  ,  BM,  BUS 
COMMON/COM1 /SATN , COUN , OCN , VLTH , 

1  ENDT  .  RNGE  , SPEED  ,  NVEH  ,  UCST  ,  LCST  ,  RN  ,  ODELAY 
CO MM0N/C0M2 /TLST, JNST, CHANGE, HFACT.NDUM, DU MJ UN, MASTJN, 


1 M I N . MAX 

EXTT 

, MI NGT 

,  MAX  GT  , 

NST , DEMDET , 

EXTDET 

,  DEM  , 

NOS  T 

,  N  JN  , 

EXT 

1  OOO 

FORMAT ( 

0  ' 

,  ' 

FAULT 

I  N 

CHST 

.MSEC: 

'  ,  G8  , 

'  R  =  '  , 

G5  .  ' 

JN:  ' 

,  G5  ,  ' 

ST:'  ,G5) 

1  OO  1 

FORMAT ( 

0  ' 

,  ' 

FAULT 

I  N 

CHST 

MSEC: 

'  ,  G8  , 

STR 

:  '  ,  G  5 

,  ' 

JN:  ' 

,  G  5  ) 

1  002 

FORMAT ( 

0  ' 

,  ' 

FAULT 

I  N 

CHRO 

MSEC: 

'  ,  G8  , 

'  2  =  ' 

.  G8  ,  ' 

JN 

s  '  ,  G5 

,  '  ST:  '  , 

1  G5  .  '  S  TR  2 

'  , 

G  5  ) 

1  003 

FORMAT ( 

O  ' 

,  ' 

FAU  L  T 

I  N 

CHRO 

R  =  ' 

.  G8  ) 

1  004 

FORMAT ( 

0  ' 

,  # 

FAU  L  T 

I  N 

CHST 

MSEC 

:  '  ,  G  8 

,  '  STR: ' ,G5, ' 

CHS  2 

'  ,  G5  , 

1  '  JN:  '  ,G5 


C 

c 


c 


c 


I F ( NDUM . EQ  O ) GO  TO  444 
DO  44  I s 1 , NDUM 
DUM: DUMJUN ( I ) 

MAST  sMAST JN (  I  ) 

CHANGE  (  DUM ,  1  )  : CHANGE  ( MAST  ,  1  ) 
44  CONTINUE 


4  3 


6  1 
62 


P  s  COUN (  4  ) 

DO  41  JN : 1 , P 

I F ( CHANGE ( JN , 1 ) . EO . O ) GO  TO  41 
I F ( TLST ( JN , 3 ) . NE . O ) GO  TO  41 
T  L  S  T |  JN  ,  3  )  : CHANGE  I  JN  ,  1  ) 

T  LS  T (  JN ,  2  )  :  - HFACT 
CONT I NUE 

START  OF  CHANGE  STAGE  ROUTINE  (  CHST  ) 
DO  10  JN  =  1  , P 

IFITLSTI JN,3) .60.0)  GO  TO  19 
I F ( TLST | JN , 3 ) . GT . O ) GO  TO  42 
T  L  S  T  (  J  N ,  3  )  : T  LS  T  (  JN  ,  3  ) ♦ 1 OOO 
I  F (  TLST  (  JN  , 3  )  .  LT  . O )  GO  TO  10 
S  TR  s  LASTST (  JN  ) 

ST  =  TLST ( JN  ,  3 ) 

DO  62  I  s  1  ,  3 , 2 
0  =  (  S  T  *  4  -  1  )  ♦  1 

ARM  =  T  LST ( JN . 0 ) 

I F ( ARM . EO . O )  GO  TO  62 
DO  61  J  s  1,3,2 
OR  =  ( STR*  4  -  1  )  +J 

A  R  MR  s  TLST(JN.OR) 

I F ( ARM . EO . ARMR )  GO  TO  63 

CONTINUE 

CONT I NUE 

STR  s  TLST (  JN ,  3  ) 

IF( (STR.GT .4) . OR . (STR 
CHS  r  -  TLS  T ( JN  ,  1  ) 

IF(STR.NE.CHS)  GO  TO  919 
DO  9  1 s 1 , 3 , 2 

R  s  O 

O  s  (  S  T  R  *  4  -  1)  «■  I 

ARM  s  T  LS  T  ( JN , 0 ) 

1 F ( ARM  EO  O )  GO  TO  9 
0+  1  ) 

OR.  (LN.E0.3)  OR.  (LN 
OR.  (LN.E0.3)  .OR  (  LN 


LT  .  1  )  )  GO  TO  18 


LN  :  TLST ( JN 
I F (  (  L  N  .  EO  1  ) 

I F ( (LN.E0.2) 

IF(  (LN.GE.4)  .AND  (LN, 
IFIR  GT  O)  GO  TO  17 
CONTINUE 

TLST ( JN ,  1  )  6  -TLST ( JN ,  1  ) 

TLST ( JN , 2  )  s  1 

TLST ( JN , 3 )  s  O 

CONTI NUE 

RETURN 

S I G 1  :  JUN ( ARM , 1 2 ) 

I F ( S I G 1  GEO)  GO  TO  14 
JUN ( ARM ,12)  s  - JUN ( ARM 
GO  TO  6 

S I G2  s  JUN I  ARM,  1 3 ) 

I F ( S I C2 . GE  0 )  GO  TO  15 


EO 

EO 


5  ) 

6  ) 


OP 

OR 


(LN 

(LN 


EO 

EO 


7  )  ) 
7  )  ) 


L  E  .  7  )  )  GO  TO  13 


1  2  ) 


GO  TO 
GO  TO 


1  1 
1  2 


60  1 

602 

603 

604 

605 

606 

607 

608 

609 

6  1  0 

6  1  1 

6  1  2 

6  1  3 

6  1  4 

6  1  5 

6  1  6 

6  1  7 

6  1  8 

6  1  S 

620 

62  1 

622 

623 

624 

625 

62  6 

627 

628 

629 

630 

63  1 

632 

633 

634 

635 

63  6 

637 

638 

639 

640 

64  1 

642 

64  3 

64  4 

64  5 

64  6 

647 

64  8 

64  9 

6  50 

65  1 

652 

65  3 

654 

655 

65  6 

657 

65  8 

659 

6  60 

66  1 

6  62 

6  63 

6  64 

6  65 

6  6  6 

6  67 

6  68 

6  69 

670 

67  1 

672 

673 

67  4 

675 

67  6 

677 

678 

679 

680 

68  1 

682 

683 

684 

685 

686 

687 

688 

669 

690 

69  1 

69  2 

693 

69  4 

695 

69  6 

697 

69  8 

69  9 

700 

70  1 

702 

703 

704 

705 

706 

707 

708 

709 

7  1  0 

7  1  1 

7  1  2 

7  1  3 

7  1  4 

7  1  5 

7  1  6 

7  1  7 

7  1  6 

7  1  9 

720 


1  3 


1  4 

1  5 

1  6 
1  7 

1  8 


1  9 
9  1  9 


2  1 
22 

23 

24 


5  1 
52 


JUN( ARM, 13)  =  ■ JUN ( ARM, 13) 

GO  TO  7 

S I G3  =  JUN  ( ARM ,14) 
IFISIC3.GEO)  GO  TO  16 
JUN ( ARM , 14) 

GO  TO  8 
R  =  1 

GO  TO  6 


JUN ( ARM .14) 


GO  TO  7 


WRITE! 6, lOOO)  MSEC , R , JN , STR 
CO  TO  9 

WR  I TE  (  6  ,  1 OO 1  )  MSEC, STR.  JN 

TEST  =  STR/ 10 

NEWST  r  STR-  1 O*  TEST 

STR  =  NEWST 

GO  TO  905 

T  L  S  T  (  J  N  ,  2  )  =  T  L  S  T  (  J  N  ,  2  )  «•  1 

GO  TO  10 

WR I TE (  6  ,  1 004  )  MS  EC  ,  STR  ,  CHS  , 
GO  TO  905 


JN 


TLST(JN.2)=TLST(JN,2)*1 
IF  (TLST(JN,2) )  10,10,2 

S  T  =  T  LS  T  (  JN ,  3 ) 

START  OF  CHANGE  STAGE  REQUEST  ROUINE  (  CHRO  ) 

Z  =  O 

IF(  (ST.CT.4)  .OR.  (ST.LT.  1  )  )  2  =  1 

I F ( ( JN . GT . COUN ( 4 ) ) . OR . ( JN . L T . 1 ) )  2  =  2  ♦  10 

I  F ( TLST ( JN ,  1  )  .  LE. 0)2=2+100 

JFIZ.GT.O)  GO  TO  26 

STR  =  T  LST ( JN  ,  1  ) 

I  F ( STR  .  EO  .  ST  )  GO  TO  24 
DO  24  I  =  1  ,  3 , 2 
R  =  O 

O  =  (  S  T  R  *  4  -  1)  ♦  I 

ARM  =  T  LS  T (  JN  , 0 ) 

I F ( ARM . EO  O )  GO  TO  24 
IMARK  =  1 

JMARK  s  DECTR ( ARM ) 

DECTR ( ARM)  =  L 0 R ( I MA R K , JMA R K ) 

LN  =  T  LS  T  (  JN  ,  0+  1  ) 

IF!  (LN.EO.  1  )  .OR  ILN.E0.3)  .OR.  UN.E0.5)  OR.  ILN.E0.7)  )  GO  TO  27 

IF!  (LN.E0.2)  .OR.  |LN  EO  .  3  )  .  OR  .  (  LN  .  EO  .  6  )  .  OR  .  (  LN  .  EO  .  7  )  )  GO  TO  28 

IFdLN.GE  4)  .AND.  ILN.LE.7))  GO  TO  29 

I F  t  R  .  GT  .  O )  GO  TO  33 

CONTINUE 

DO  5  2  I  =  1  .  3 , 2 

O  =  (  S  T  *  4  -1)  ♦  I 

ARM  :  TLST(JN.O) 

IF(ARM.EO.O)  GO  TO  52 
DO  51  J  =1,3,2 
OR  s  I  S  T  R  *  4  -  1  )  +  J 

A  RMR  =  T  LS  T  (  JN  , OR ) 

IFlARM.E0.4RMR)  GO  TO  53 
CONT I NUE 
CONTI NUE 

L ASTST ( JN )  =  STR 


144 


924  TLST (  JN  ,  1  )  =  -ST 

T  LST (  JN  ,  2  )  =  O 

INTG  =  TLST 1 JN , ST+ 1 9 ) 

I  F  (  I  NTG  .ECO)  GO  TO  926 
TLST! JN,3)  =  ST  -  INTG* lOOO 

GO  TO  43 

53  IMARK  =  1 

JMARK  =  2 

K  MA  R  K  =  4 

L  N  =  TLST (  JN , 0+ 1 ) 

LNR=TLST ( JN , 0R  + 1 ) 

L  NO  =  LAND!  LN,  LNR) 

LNL  =  LAND  (IMARK, LNO) 

IF(LNLEO-O)  GO  TO  54 

JUN ( ARM ,  12)  =  *  JUN (  ARM ,  12) 

54  LNL  =  L AND ( JMARK , LNO ) 
IF(LNL.EO.O)  GO  TO  55 

JUN ( ARM , 13)  =  - JUN l ARM , 13) 

55  LNL  =  L AND ( KMARK , LNO ) 

IF(LNL  EO.O)  GO  TO  56 

JUN ( ARM, 14)  =  -  JUN ( ARM, 14) 

56  GO  TO  51 

6  3  1  MARK  =  1 

JMARK  =  2  ' 

KMARK  =  4 

LN  =  TLST ( JN , 0+ 1  ) 

LNR: TLST ( JN , 0R+ 1  ) 

LNO  =  LAND ( LN , LNR ) 

LNL  =  L AND (  L NO ,  I  MARK ) 
IF(LNL.EO.O)  GO  TO  64 


JUN | ARM ,12)  s 

- JUN ( ARM , 

1  2  ) 

64 

LNL  = 

LAND ( JMARK , LNO ) 

I  F (  LNL 

EO.O) 

GO  TO  65 

JUN ( ARM , 13)  = 

- JUN ( ARM , 

13) 

65 

LNL  = 

LAND  I KMARK ,  LNO ) 

I  F (  LNL 

■EO.O) 

GO  TO  66 

JUN ( ARM, 14)  = 

- JUN ( ARM , 

1  «  ) 

6  6 

GO  TO 

6  1 

25 

2  :  2  + 

1  OOO 

2  6 

WRl TE ( 6 , 1 002 ) 

MSEC . Z , JN 

.ST 

GO  TO 

24 

9  2  6 

TLST ( JN , 3 )  = 

ST  -  1 OOO 

GO  TO 

43 

27 

S  I  G  1  = 

JUN ( ARM .12) 

I F ( S I G 1 .LEO)  GO  TO  30 
JUN ( ARM, 12)  =  - JUN ( ARM , 12) 

GO  TO  21 

28  S I C2  =  JUN ( ARM ,13) 
IF(SIC2.LE0)  CO  TO  31 

JUN ( ARM, 13)  =  • JUN ( ARM, 13) 

GO  TO  22 

29  S I G  3  =  JUN  |  ARM ,14) 

IFISIG3.LE  O)  GO  TO  32 
JUN ( A  RM ,14)  x  -JUN!  ARM,  14) 
GO  TO  23 

30  R  =  1 

GO  TO  21 
3  1  R  =  R  +  1  O 

GO  TO  22 
R  =  R  4  lOO 


32 


. 


72  1 

722 

723 

724 

725 

72  6 

727 

72  8 

729 

730 

73  1 

732 

733 

734 

735 

73  6 

737 

738 

739 

740 

74  1 

742 

74  3 

7  4  4 

74  5 

74  6 

747 

74  6 

7  4  9 

750 

75  1 

75  2 

753 

754 

755 

75  6 

757 

758 

759 

7  60 

7  6  1 

7  62 

7  63 

7  64 

765 

7  6  6 

767 

7  6  8 

7  69 

770 

77  1 

772 

773 

774 

775 

77  6 

777 

778 

779 

780 

78  1 

782 

783 

784 

785 

78  6 

787 

788 

78  9 

790 

79  1 

79  2 

79  3 

79  4 

79  5 

79  6 

79  7 

796 

79  9 

800 

80  1 

802 

803 

804 

805 

806 

807 

808 

809 

8  1  0 

8  1  1 

8  1  2 

8  1  3 

8  1  4 

8  1  5 

8  1  6 

8  1  7 

8  1  8 

8  1  9 

820 

82  1 

822 

823 

8  24 

825 

826 

827 

828 

829 

830 

83  1 

832 

833 

634 

835 

836 

837 

838 

839 

840 


33  WRITE! 6, 1003)  R 
GO  TO  26 


END 

SUBROUTINE  EMW01 

C  ENTRY  AND  EXIT  DECISION  ROUTINES 

IMPLICIT  INTEGER  (A-Z) 

INTEGERS  MSEC,  JTST,  NOUT,  NPER ,  BM.  BUS 
REAL  RD 

INTEGERM  JUN  ,  DET  ,  ENTRY , JST ,  EST ,  DST ,  CARS  ,  DTCN .  NSTOP  ,  OUTDAT  , COUT , 
1MLANE  ,  BLANE ,  LTH,  VELO,  DETINT 
REAL  *  8  TIM 

DIMENSION  JUN (  75 , 30 )  ,  D  E  T  (  120,  15)  ,DECTR(75)  ,  ENTRY l 40 , 6)  , 

1JSTI75)  ,  D  S  T  (  120)  ,EST(40)  ,CARS(750,4).JTST(75),DTCN(75)  , 

2DLY(75)  ,  NSTOP (  75  )  ,  OUTDAT  (  12,3)  ,C0UT(5,2)  , 

3 S  A T  N (  3  )  ,  C  0  U  N (  5  )  , OCN ( 3 )  , 

4ML ANE  (6,8)  , BLANE  (6,4)  ,LTH(75),VELO(75),DET1NT(120) 

COMMON  JUN , DET , DECTR , ENTRY , JST , DST , EST , CARS , MSEC , 

1JTST.DTCN.DLY,  NSTOP,  OUTDAT  ,  COUT  ,  NOUT ,  NPER, 

2MLANE,  BLANE,  LTH,  VELO,  DETINT  ,  BM,  BUS 
C0MM0N/C0M1 /SATN , COUN , OCN , VLTH , 

1ENDT.RNGE,  SPEED,  NVEH,UCST,  LCST  ,  RN  ,  ODELAY 
COMMON  / B  L  K 1 /  NS TRT  (  40 )  , S UMN  (  40 )  , S NSO (  40 )  ,  TNS TRT (  40  )  ,  TSUMN  (  40 ) 

1  ,  TSNSO (  40 )  ,  NM (  40 ) 

1005  FORMAT( '  ' ,T20, '  UCST  IS  EMPTY  ') 

19  PL  sO 

MMSEC  s  MSEC  -  60*(MSEC/60) 

20  P  L  *  P  L  +  1 
GO  TO  301 

21  I F ( P L . EO - COUN ( 3 ) )  GO  TO  22 
GO  TO  20 

22  RETURN 

C  IF  EXIT  POINT  GO  TO  21 

301  I F ( ENTR Y ( P L , 4 ) . EO . O )  GO  TO  21 
C  EXTRACT  ENTRY  POINT  DATA 

PCAR  =  ENTRY  (  PL  ,  3  ) 

A  N  L  K  =  ENTRY  (  P  L  ,  4  ) 

T IMEN  s  ENTRY ( PL . 5 ) 


C  CALCULATE  NUMBER  OF  CARS  TO  RELEASE 

COUNT  =  O 

302  I F ( PCAR . LT . 5000 )  GO  TO  303 

PCAR  s  PCAR  -  5000 

I F ( MSEC  EO. 1 )R:RN 
R  sR*  803 

R0=O . S+FLOAT ( R ) * .2328306E-9 

RNS  =  1 0000*RD+ 1 

IF(RNS  .GT  .5000)  GO  TO  302 

COUNT  =  COUNT  ♦  1 

GO  TO  302 

303  I F ( MSEC . EO . 1 ) R = RN 
R  =  R*  803 

RD=O.5+FL0AT|R)» .2328306E-9 
RNS  =  1 OOOO* RD+ 1 
1  F (  RNS  .  GT  .  PCAR  )  GO  TO  304 
COUNT  =  COUNT  «•  1 

C  INCREMENT  STORES  FOR  I  EVERY  MINUTE. 

304  NM(PL)  s  NM(PL)  +  COUNT 

I F  ( MMSEC )  3,2,3 

2  NSTRT(PL)  =  NSTRT(PL)  ♦  1 
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SUMN(PL)  =  SUMN(PL)  +  NM(PL) 

SNSO(PL)  =  SNSO(PL)  +  NM ( P l ) * NM ( P L ) 

NM(PL)  s  O 

C  . 

C  STORE  VEHICLES  IN  DETECTOR  DECISION  LIST 

3  IF  (COUNT. EO  O)  GO  TO  21 
COUNT  =  COUNT  -  1 

ENTRY  I  PL ,  6)  =  ENTRYIPL.6)  +  1 

AVEH=UCST 
UCST : CARS ( AVEH , 4 ) 

I F ( UCST . EO . O )  GO  TO  310 
I  F (  UCST - LCST )  3304,9304,8304 

8304  LCST  =  UCST 

3304  RNS  =  GGUBFS ( 1 OOOO )  +  1 

I  F (  RNS  .  LE  .  DET (  ANLK ,  8 )  )  GO  TO  215 
K  =  DET (ANLK, 8)  +  DETIANLK.9) 

I  F  (  RNS  . LE . K )  GO  TO  2  16 
CARS ( A VEH , 2 )  =  1 

9305  CARSIAVEH, 1 1  =  TIMEN 

CARS  I AVEH ,3)=SPEED 
CARS  I AVEH ,  4  )  =0 
NCARsDET ( ANLK, 2 ) 

I F ( NCAR . EO . O )  GO  TO  311 
CARS ( NCAR , 4 ) = AVEH 

305  DET ( ANL K , 2 ) = AVEH 

OETIANLK, 6|  =  DET ( ANLK , 6)  +  1 

CARS (  A VEH  ,  4  )  :  O 
GO  TO  3 

306  DET  ( ANL  K ,  1  )  =  AVEH 
GO  TO  305 

2 1 5  CARS ( A VEH , 2 )  =  2 

GO  TO  9305 

2 1  6  CARS  ( A VEH ,  2  )  :  3 

GO  TO  9305 

C  . 

C  CAR  STORE  EMPTY,  DUMP  CORE 

310  UCST  =  AVEH 
WRITE  (  6  ,  1005  ) 

C  ENTER  ENDJOB  SUBROUTINE  TO  TERMINATE  THIS  RUN 

CALL  ENDP 

311  DET ( ANLK , 1 )  =  AVEH 

GO  TO  305 

END 

SUBROUTINE  JMWO 1 
C  JUNCTION  DECISION  ROUTINE 

IMPLICIT  INTEGER(A-Z) 

I  NTEGER*4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

I  NTEGER*4  JUN,  DET,  ENTRY,  JST,  EST,  DST,  CARS,  DTCN,  NSTOP,  OUTDAT,  COUT, 
1  MLANE, BLANE. LTH, VELO, DETINT, OTMP (3), 

3MIN, MAX, EXTT,M]NGT,MAKGT,NST,OEMOET,EXTDET, DEM, NOST.DCARS, HIST 

REAL* 8  TIM 

DIMENSION  JUN175.30)  ,  D  E  T  (  120,  15)  ,DECTR(75)  ,  ENTRY  (  40, 6)  , 

1JSTI7S)  ,  D  S  T (  120)  ,EST(40)  ,  CARSI750.4)  ,JTST(7S)  ,CTCN(7S)  , 

2DLY(75) , NSTOP [ 75 ) , OUTDAT ( 12,3),C0UT(5,2), 

3SATNI3) .COUNtS) , OCN ( 3 ) , 

4TLST(28,23),TIMING(28,6),CTIMEI6),TIME(6),JNST(28),CHANGEI28,2), 
5  MLANE (  6,  8)  ,  BLANEI  6,  4)  ,  LTH(7S)  ,VEL0(75)  , DE  T I  NT |  120)  , 

6DUMJUN (  4  )  . MAST JN  I  4  )  , 

7MIN128 , 4  )  , M A  X  (  2  8  ,  4  )  ,EXTT(28)  .MINGTI28)  ,MAXGT(28)  ,NST(28,4)  , 
8DEMDET(28,4,2),EXTDET(28,4,6),DEM(28,4),N0ST(28) 


. 


• 

. 


84  1 

842 

843 

844 

845 

84  6 

847 

848 

84  9 

850 

85  1 

852 

853 

854 

855 

85  6 

857 

858 

859 

8  60 

86  1 

862 

8  63 

8  64 

8  65 

8  6  6 

8  6  7 

8  68 

869 

870 

87  1 

872 

873 

874 

875 

£76 

877 

878 

879 

880 

88  1 

882 

883 

884 

885 

8  8  6 

887 

888 

889 

890 

89  1 

8  9  2 

89  3 

8  9  4 

895 

89  6 

8  9  7 

89  8 

8  9  9 

900 

90  1 

902 

9  03 

904 

905 

906 

907 

908 

909 

9  1  0 

9  1  1 

9  1  2 

9  1  3 

9  1  4 

9  1  5 

9  1  6 

9  1  7 

9  1  8 

9  1  9 

9  20 

92  1 

9  22 

9  23 

9  24 

9  25 

926 

9  27 

9  28 

929 

9  30 

9  3  1 

9  32 

933 

9  34 

935 

936 

937 

9  38 

9  39 

9  40 

9  4  1 

9  4  2 

9  4  3 

9  4  4 

945 

9  4  6 

947 

9  4  8 

949 

950 

95  1 

952 

9  5  3 

9  54 

955 

9  5  6 

957 

958 

959 

9  60 


COMMON  JUN , DET , DECTR , ENTRY , JST , DST, EST , CARS ,MSEC , 
t JTST  ,  DTCN  ,  DL  Y  ,  NSTOP  ,  OUTDAT.COUT  ,  NOUT,  NPER, 

2MLflNE,BLANE(LTH, VEL0,DET1NT(BM,BUS 
COMMON/ COM  1  /SATN,  C  0  U  N  ,  O  C  N  ,  VLTH  , 

1  ENDT . RNGE, SPEED, NVEH, UCST , LCST , RN.QDELAY 
COMMON / COM2 / T  LST  , JNST  ,  CHANGE  ,  HFACT ,  NDUM ,  DUMJUN , MAST JN  , 

1MI N , MAX , EXTT , Ml NGT , MAXGT , NST , DEMDET , EXTDET , DEM, NOST , NJN , EXT 
COMMON  /BLKHST /  D C A R S ( 7 5 O J ( H I S T ( 7 5 , 2 O ) . H S T 1 N C 

1000  FOR  MA  T (  '  '  ,  'LINK  SATURATED  FOR  ',C2,'  CYCLES  AT  JUNCTION  STOPLINE 

1  '  .  G6  ) 

1001  FORMAT! '  ‘ , T20 , G6 , '  VEHICLES  LEFT  AT  END  OF  GREEN' ) 

13  P  L  =  O 

14  P  L  =  P  L +  1 
GO  TO  101 

15  IFIPL .EO.COUNt 1 ) )  GO  TO  16 
GO  TO  14 

16  RETURN 

23  A  1  =  O 

A  2  =  1 

A  1  =  A  2  /  A  1 

CALL  EXIT 
GO  TO  16 

C  CLEAR  STORES 

10  1  F VEH  =  O 
L  VEH  =  O 
MARK  =  O 
CCNP  =  O 
VRED  =  O 
DEOU  =  0 
TEMP  =0 
R  T  3  =  O 

DO  1  02  J  =  1  ,  3 

OCN (  J )  =  O 
S ATN (  J  )  so 
OTMP ( J )  r  o 
102  CONTINUE 


AVEH: JUN  (  P  L  .  1  ) 

C  IF  NO  VEHICLES  IN  LIST  GO  TO  137 

IF  (AVEH)  310,310,2000 

C  INCREMENT  SATURATION  FLOW  CARRY  IF  THE  LIGHTS  ARE  GREEN 
310  DO  300  J:1,3 

IF  ( JUN ( P L , J  + 1 1 ) )  300,300.305 

305  TTT  s  JUN(PL,J+5) 

IF  ( TTT )  300 , 300 , 301 

301  ITTT  =  JUN ( PL , J+8 )  +  TTT 

IF  (ITTT-IOO)  304,300,300 
304  JUNIPL, J+B)  =  ITTT 
GO  TO  300 
300  CONTI NUE 
GO  TO  137 

C  . 

C  COUNT  NUMBER  OF  ARMS  SHOWING  RED 

2000  J  s  o 

DO  200 1  1  s  1,3 

K  s  JUN  (  P  L  ,  I  +  1  1  ) 

I F ( K . GT . O )  GO  TO  200 1 
J  =  J  +  1 

2001  CONTINUE 


C 


146 


C 

C 


c 

c 

103 

c 


1  04 

1  05 
C 

9  105 
C 


c 

c 

1  06 


108 
1  09 
1  1  O 


1  1  1 
1  1  2 


IF  ALL  ARMS  ARE  RED  GO  TO  150 

IF( J.E0.3)  GO  TO  150 

SOME  ARMS  GREEN 

JUN  (  P  L  ,  27  )  s  O 

Ml  so 

M2  s  O 

M3  s  O 


COUNT  CARS  READY  TO  BE  PROCESSED  FOR  EACH  ARM  AND  STORE 
I F ( AVEH . EC . O )  GO  TO  106 

Ml  COUNTS  TOTAL  NUMBER  OF  CARS  IN  LIST 

Ml  s  Ml  1 

CARS  ( AVEH ,  1  )  : CARS  (  AVEH ,  1  )  -  1 
I F ( CARS ( A VEH , 1 ) . L E . O )  GO  TO  105 
A VEH  s  CARS  ( AVEH  ,  4  ) 

GO  TO  103 
K  s  CARS | AVEH , 2 ) 


M2 

M2 

COUNTS 
=  M2  + 

TOTAL 

1 

NO 

OF  CARS 

TO 

BE  PROCESSED 

OCN 

COUNTS 

CARS 

TO 

PROCESS 

FOR 

EACH  DIRECTION 

DCARS  ( AVEH )  s  DCARS  ( AVEH  )  +  1 

OCN ( K )  s  OCN ( K )  +  1 

I  F  (  (  CARS  (  A  VEH  ,  1  )  +  1  )  .  EO  .  O  )  NSTOP  (  PL  )  :NSTOP  (  PL  )  +  1 

GO  TO  104 


TO  BE 
1  80 


CALCULATE  VEHICLES 
IF  ( M2 . EO . O )  GO  TO 
AVEH  s  JUN (  P  L  ,  1  ) 

RT  s  OCN ( 3 ) 

DO  112  J  M ,3 

SATN (  J  )  s  JUN (PL,  J  +  5) 

I F ( SATN (J).GE.O)  GO  TO 
TEMP  s  -  S ATN ( J ) 

OCN ( TEMP )  s  OCN(TEMP) 

OCN { J  )  s  SATN ( J ) 

GO  TO  112 
TEMP  s  o 

JUN(PL,J+8)  s  JUNIPL, J+8) 

I F ( ( JUN ( PL , J+8 )  -  100). LT 

JUN ( PL , J+8 )  s  JUNIPL, J+8) 

TEMP  s  TEMP  +  1 

OTMP ( J )  s  1 
GO  TO  110 
S ATN (  J  )  s  TEMP 
CONTINUE 


RELEASED  IF  FLOW  SATURATED 


+  OCN ( J ) 


O  ) 


SATN ( J ) 

CO  TO  111 
1  OO 


C  . 

C  CALCULATE  NUMBER  OF  VEHICLES  TO  BE  RELEASED  THIS  SECOND 

114  DO  116  J  s  1  ,  3 

I F ( OCN ( J ) . LT . O )  GO  TO  116 
IF  ( OCN l J ) . GE . S ATN ( J ) )  GO  TO  9116 
C  IF  THERE  ARE  LESS  VEHICLES  IN  A  GIVEN  DIRECTION  THAN 

C  COULD  BE  RELEASED  SET  THE  SATURATION  FLOW  CARRY  TO  1 OO 

C  FOR  THAT  DIRECTION. 

JUN (  P  L  ,  J  +  8  )  =  1 OO 

C  M3  COUNTS  CARS  TO  BE  RELEASED 

9  114  M3  r  M3  +  OCN (  J  ) 

GO  TO  116 

9116  OCN ( J )  s  SATN ( J ) 

C  M3  COUNTS  CARS  TO  BE  RELEASED 

M3  *  M3  ♦  OCNlJ) 


IN  OCN 


. 


9  6  1 

9  6  2 

9  63 

9  64 

9  65 

9  6  6 

9  67 

9  66 

9  69 

9  70 

9  7  1 

9  72 

973 

974 

9  75 

976 

977 

978 

9  7  9 

9  80 

9  8  1 

982 

983 

9  84 

9  85 

9  8  6 

9  87 

9  88 

9  89 

9  90 

99  1 

992 

9  9  3 

9  9  4 

995 

9  9  6 

99  7 

9  9  8 

999 

1  OOO 

1  OO  1 

1  002 

1  003 

1  004 

1  005 

1  006 

1  007 

1  008 

1  009 

10  10 

1  O  1  1 

10  12 

10  13 

10  14 

10  15 

10  16 

10  17 

10  18 

10  19 

1  020 

102  1 

1  022 

1023 

1024 

1025 

1026 

1027 

1  028 

1029 

1  030 

1  03  1 

1032 

1033 

1034 

1035 

103  6 

1  037 

1  038 

1  039 

1040 

1  04  1 

104  2 

104  3 

1  044 

1  04  5 

104  6 

1  04  7 

1  048 

1  04  9 

1  050 

1  05  1 

1052 

1053 

1  054 

1  055 

1  056 

1  057 

1058 

1059 

1060 

106  1 

1062 

1063 

1064 

1065 

106  6 

1067 

1068 

1069 

1070 

107  1 

1  072 

1  073 

1074 

1  075 

1076 

1077 

1078 

1079 

1080 


1  6  CONT I NUE 

Ml 

Ml 

* 

COUNT  OF 

Ml  -  M3 

CARS 

LEFT 

I  N 

LIST 
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M2 

M2 

s 

COUNT  OF 
M2  -  M3 

CARS 

LEFT 

I  N 

LIST  WITH  TIMERS  EXPIRED 

C  SEE  WHETHER  THE  DOWNSTREAM  TRAFFIC  LIGHTS  ARE  GREEN. 
C  IF  SO  VGRN  s  2  TO  DOUBLE  THE  VEHICLE  LENGTH. 

IF  (M3)  145,145, 400 

400  DO  401  I J  s  1,3 

A  N  L  K  s  JUN (PL,  I  J  ♦  2  ) 

IF  (ANLK)  401,401,402 
402  TEMP  s  DET ( ANLK , 12) 

ANLK  s  DET ( ANLK, 3 ) 

IF( TEMP  -  1)  402,404,402 

404  DO  405  IK  s  1,3 

IF  (  JUN ( ANLK ,  I K-M  1  )  )  405.405,406 

405  CONTINUE 

40 1  CONT  I  NUE 

VGRN  =  1 

GO  TO  403 

406  VGRN  =  2 

GO  TO  403 


C  START  OF  MAIN  JUNCTION  ROUTINE 

C  IF  NO  VEHICLES  TO  BE  RELEASED  GO  TO  145 

117  I F ( M3 . LE . O )  GO  TO  145 
403  DIRN  s  CARS  I AVEH ,  2 } 

LANES  t  JUN( PL , DIRN+1 1 ) 

C  IF  LIGHTS  RED  GO  TO  136 

I F ( L ANES . LT . O )  GO  TO  136 
C  L I GHTS  GREEN 

C  CAN  ANY  VEHICLES  BE  RELEASED 

I F ( OCN ( D I RN ) . L T . O )  GO  TO  126 
TEMP  s  DIRN 
GO  TO  127 

1 2  6  TEMP  :  - OCN (  D I RN  ) 

127  1 F (( OCN ( TEMP ). EC . O ). OR .( CARS ( AVEH , 1 ). GT . O ) )  GO  TO  131 

OCN ( TEMP )  s  OCN ( TEMP )  -  1 

C  . 

C  EXTRACT  DATA  FOR  VEHICLE  TO  BE  RELEASED 

118  VEL  =  JUN(PL,DIRN+14) 

DIST  =  JUNI  PL  .D1RN+17  ) 

ANLK  s  JUNlPL.DIRN+2) 

I  F  (  (  R  T  3  NE.3)  AND.  ID1RN.E0.3)  )  GO  TO  161 
C  SWITCH  ACCORDING  TO  WHETHER  NEXT  LINK  IS  EXIT  POINT. DUMMY  EXIT 

C  POINT  OR  DETECTOR 

119  IF(ANLK)  139,155,120 

120  DEOU  :  DIST  *  LANES  -  VGRN*  (  VLTH*DET  (ANLK,  6)  )  • VLTH 

C  IS  THERE  ROOM  TO  PASS  THIS  VEHICLE  TO  THE  NEXT  LINK 

C  IF  NOT  GO  TO  136  AND  TREAT  AS  IF  LIGHT  RED 

I F ( DEOU . L T . O )  GO  TO  8136 
M3  =  M3  -  1 

IF1DIRN  -  2)  2120,122,1120 

1120  I F ( JUN ( P L , 22 ) . L T  1 OOO )  GO  TO  122 
J  U  N (  P  L  ,  2  2  )  =  JUN(PL  ,22)  -  1 OOO 

GO  TO  122 

2120  I F ( JUN ( P L , 22 ) . GE  1 OOO )  GO  TO  4120 
R  T  9  s  JUN (  P  L  ,  22 ) 

3120  1 F ( RT9 . L T . 1 OO )  GO  TO  122 

JUN(PL,22]  =  J  U  N ( P  L  ,  2  2  )  -  1 OO 


GO  TO  122 

4120  RTS  =  J  U  N (  P  L  ,  2  2  )  *  1000 

GO  TO  3120 

C  . . - . - . 

C  CALCULATE  VEHICLE  VELOCITY 

122  R  NS  =  GGUBFS  (  1 OO  )  +  1 

VEL  s  VEL  ♦  (  (  (  VEL*RNGE  )  *  ( RNS  *50 )  J/SOOO) 

C  CALCULATE  TIME  UNTIL  NEXT  DECISION 

J  *  DIST/  VEL 

K  =  ((DIST  -  J*VEL ) * lOOOO ) /VEL 
RNS  s  GGUBFS  (  1  OOOO  )  1 

I  F (  K  .  GT  .  RNS  )  J  s  J  ♦  1 

CARS ( A VEH , 1 )  =  J 

C  IS  THIS  A  SPECIAL  VEHICLE 

I F ( CARS ( AVEH , 3 ) . LT . O )  GO  TO  128 
CARS (AVEH, 3) :VEL 


C  CALCUCATE  DIRECTION  FOR  AN  ORDINARY  VEHICLE 

9210  RNS  s  GGUBFS ( 1 OOOO )  ♦  1 

I F ( RNS . L E . DET ( AN L K , 8 ) )  GO  TO  215 
K  s  DET (ANLK, 8)  ♦  DET l ANLK , 9 ) 

I F ( RNS . LE . K)  GO  TO  216 
CARS  ( AVEH  ,  2  )  =  1 
GO  TO  124 

2 1 5  CARS ( A VEH ,  2  )  s  2 
GO  TO  124 

2 1  6  CARS  ( A VEH  ,  2  )  =3 

C  . 

C  STORE  VEHICLE  IN  NEXT  DECISION  LIST 

124  TEMPI  r  ANLK 

TEMP2  s  DET ( ANLK , 1 O ) 

DCARS ( AVEH )  =  DC ARS (AVEH)  -  1 

DO  1  IHIST  =  1,19 

IF  (DCARS(AVEH)  -  I H 1 S T * H S T I N C )  2,1,1 

1  CONTINUE 

IHIST  =  20 

2  H  1ST  ( PL  ,  IHIST )  =  H 1 S T (  P L  ,  I  H  I  S T )  ♦  1 

DLY(PL)  s  DLY(PL)  +  DCARS ( AVEH ) 

DCARS ( AVEH )  r  O 

30  IF(TEMP2  -  7)  31,32,33 

31  TEMP2  s  DET ( TEMP  1  ,  1 2 ) 

TEMP  1  s  DET (  TEMP  1.3) 

I F ( TEMP2  EO . 1 ) GO  TO  36 
GO  TO  30 

32  I F ( CARS ( AVEH , 3 ) . GT . O )  GO  TO  31 
TEMP3  s  DET  (  TEMP  1,11) 

TEMP2  s  BL ANE ( TEMP3 , 2 ) 

TEMPI  s  BL ANE ( TEMP3 , 1 ) 

I F ( TEMP2 .  EO .  1  )  GO  TO  36 
GO  TO  30 

33  I F ( CARS ( AVEH , 2 ) -  2)  31,34,35 

34  TEMP3  =  DET ( TEMP  1  ,  1  1  ) 

TEMP2  s  ML ANE ( TEMP3 , 2 ) 

TEMPI  =  ML ANE ( TEMP3 , 1 ) 

1 F ( TEMP2 . EO . 1 ) GO  TO  36 
GO  TO  30 

35  TEMP3  s  DET ( TEMP  1  ,  1  1  ) 

TEMP2  s  ML ANE ( TEMP3 . 6 ) 

TEMPI  s  ML ANE ( TEMP3 , 5 ) 

I F ( TEMP2 . EO . 1 ) GO  TO  36 


• 

1  OS  1 

1082 

108  3 

1084 

1085 

108  6 

1087 

1088 

1089 

1090 

109  1 

109  2 

1  09  3 

109  4 

109  5 

1  09  6 

1  09  7 

109  8 

1  09  9 

1  1  OO 

110  1 

1102 

1  1  03 

1  1  04 

1  1  05 

1106 

1107 

1108 

1  1  09 

1110 

1111 

1112 

1113 

1114 

1115 

1116 

1117 

1118 

1119 

1  1  20 

112  1 

1122 

1123 

1124 

1125 

112  6 

1127 

1128 

1129 

1  1  30 

113  1 

1  1  32 

1  1  33 

1134 

1135 

1136 

1  1  37 

1138 

1139 

1140 

114  1 

114  2 

114  3 

1144 

114  5 

114  6 

114  7 

1148 

1149 

1150 

115  1 

1152 

1153 

1154 

1155 

115  6 

1157 

1158 

1159 

1160 

116  1 

1162 

1163 

1164 

1165 

116  6 

1167 

1  1  68 

1169 

1  1  70 

117  1 

1172 

1  1  73 

1174 

1175 

1176 

1  1  77 

1178 

1179 

1  1  80 

118  1 

1182 

1183 

1184 

118  5 

118  6 

1187 

1188 

1189 

1190 

119  1 

1192 

119  3 

119  4 

119  5 

119  6 

1197 

1198 

119  9 

1  200 


GO  TO  30 
36  NSL  =  TEMPI 

JTST(NSL)  s  JTST  (  NS  L  ) -fCARS  (  AVEH  ,  1  ) 

C  ADD  1  TO  VEHICLE  TIMER  AS  DETECTOR  ROUTINE  FOLLOWS 
CARS ( AVEH , 1 )  r  CARS (AVEH, 1 )  ♦  1 

I  F  ( DET | ANLK ,  2  )  .EO.O)  GO  TO  129 
NLCAR: DET ( ANLK , 2 ) 

DET ( ANLK , 2 ) = AVEH 
CARS ( NLCAR , 4 ) : AVEH 
9124  IFIRT3.E0.3)  GO  TO  173 

1FICARSIAVEH.4)  .EO.O)  GO  TO  137 
125  NL CAR r CARS  ( A VEH  ,  4  ) 

CARS  ( A VEH ,  4  )  s  O 
A VEH  s  N  L  CAR 
GO  TO  117 

C  . 

c  . 

C  SPECIAL  CAR  SUBROUTINE  CALL  POINT 

1  28  CARS  (AVEH,  3)  =  *  V  E  L 

CALL  S VEH ( 1 . P L , AVEH , 2 , ANLK ) 

CALL  SVH 1 ( AVEH , ANLK ) 

CO  TO  124 

C  . 

C  NO  VEHICLES  ON  NEXT  LINK 

129  DET ( ANLK  ,  1  )  s  AVEH 
DET  ( ANLK ,  2  )  =  AVEH 
GO  TO  9124 


C  CARS  NOT  PROCESSED  THIS  SECOND 

131  CCNP : CCNP+ 1 

132  IFIRT3.EQ.3)  GO  TO  171 
IF(FVEH.EOO)  GO  TO  134 

C  TAG  THIS  CAR  ONTO  THE  ONE  AHEAD 

CARS  (  L  VEH  ,  4  )  s  AVEH 

133  LVEH  £  AVEH 

lF|CARS(flVEH,4) .EO.O)  GO  TO  137 
AVEH  sCARS  (  AVEH  ,  4  ) 

C  ZERO  LAST  WORD  IN  CASE  NEW  AVEH  IS  TO  BE  TAKEN  OUT  OF  OUEUE. 
CARS  (  L  VEH  ,  4  )  s  O 
GO  TO  117 

C  FIRST  VEHICLES  NOT  PROCESSED 

1  34  FVEH  =  AVEH 
GO  TO  133 


C  . 

C  VEHICLE  TRANSFER  BLOCKED 

C  RESET  SATURATION  FLOW  CARRY  SO  THAT  SATURATION  FLOW  IS  NOT 
C  LOST. 

8136  IF  (DIRN  -  2)  2135,2210,1135 

1135  IF  (OTMP (3) )  2205,2205,2207 
2207  JUN (  P  L  ,  1  1  )  s  1 OO 

2205  IF  ( JUN ( P L , 22 ) . GE  1 OOO )  GO  TO  9136 
J  U  N (  P  L  ,  2  2  )  s  J  U  N (  P  L  ,  2  2  )  ♦  1 OOO 

GO  TO  9  1 3  6 

2135  IF  (OTMP( 1 ) )  2202,2202,2203 
2203  JUN (  P  L  ,  9  j  s  100 

2202  IF  ( JUN ( P L , 22 ) . GE . 1 OOO )  GO  TO  4135 
R  T  8  s  JUN (  P  L  .  22 ) 

3135  IFIRT8.GE. lOO)  GO  TO  9136 

JUN(PL,22)  s  J  U  N (  P  L  ,  2  2 )  ♦  1 OO 

GOTO  9136 
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4135  R  T  8  =  J  U  N ( P  L  ,  2  2 )  -  1 OOO 
GO  TO  3135 

C  NO  VEHICLE  TRANSFER  POSSIBLE  IN  THIS  DIRECTION.  CORRECT  OCN  VALUE 

2210  IF  ( OTMP ( 2 ) )  9136.9136.2201 

220  1  JUN (  P  L  ,  1 O )  =  1 OO 

9136  OCN ( TEMP )  s  OCN(TEMP)  +  1 

C  LIGHTS  RED 

136  I F ( CARS  ( A VEH  .  1  )  .  GT  .  O )  GO  TO  131 
C  INCREMENT  COUNT  OF  CARS  STOPPED  ON  RED 

VRED  =  VRED  ♦  1 

GO  TO  131 

C  . - . . . 

C  SIGN  OFF  ROUTINE 

1  37  JUN {  P  L  ,  1  )  s  F VEH 
JUN (PL, 2)  s  LVEH 

I F ( JUN ( P L . 1 4 ) . GE . O )  GO  TO  2002 

1MARK  s  1 

JMARK  s  DECTR ( PL ) 

I  F (  L AND (  I  MARK ,  JMARK )  . EO  .  1  )  GO  TO  166 
2002  J  U  N (  P  L  ,  2  4  )  s  CCNP 
J  U  N (  PL  ,  2  5  )  s  VRED 
IMARK  =  1 

JMARK  =  DECTR(PL) 

IMARK  s  L AND  (  I  MARK ,  JMARK  ) 

DECTR(PL)  s  L XOR (  1  MARK ,  JMARK  ) 

GO  TO  15 

C  . - . 

C  NEXT  DECISION  AN  EXIT  POINT 

139  ANLK: - ANLK 
M3  =  M3  -  1 

I F ( CARS ( AVEH ,  3  )  .  LT  .  O )  GO  TO  142 
C  FILL  GAP  IN  JUNCTION  OUEUE 

9139  NLCAR  s  CARS  I  AVEH  ,  4  ) 

C  ADD  VEHICLE  BACK  ONTO  FRONT  OF  UNUSED  VEHICLE  QUEUE 

CARS ( AVEH  ,  4  )  s  UCST 
D  C ARS  (AVEH)  s  DCARS ( AVEH )  -  1 

DO  3  IHIST  s  1,19 

IF  ( DCARS  ( AVEH  )  -  I H I S T * H S T I N C )  4.3,3 

3  CONTINUE 

IHIST  =  20 

4  H  I  S  T  (  P  L  ,  I  H  I  S  T  )  s  H  I  S  T  (  P  L  .  I  H  I  S  T  )  ♦  1 

DLY(PL)  s  DLY(PL)  ♦  DCARS (AVEH) 

DCARS  ( AVEH  )  s  O 

ENTR Y ( ANLK , 6 )  s  ENTRY ( ANL K , 6 )  ♦  1 

UCST  =  AVEH 

I F ( R  T  3  .  EO  .  3 )  GO  TO  179 
I F ( NLCAR  EO.O)  GO  TO  137 
AVEH  s  NLCAR 
GOTO  117 

C  . 

1  42  CARS  ( AVEH ,  1  )  *0 

CALL  S VEH ( 1 , PL , AVEH , 3 , ANLK ) 

CALL  SVEH ( 3 . ANLK , AVEH , 3 , ANLK ) 

CO  TO  9139 

C  . - . 

145  CCNP  =  Ml 

IF(FVEH.EO.O)  GO  TO  147 
CARS  (  L  VEH  ,  4 )  *  AVEH 

LVEH  =  JUN ( P  L  , 2 ) 

CO  TO  137 


1  4  6 


■ 


1  20  1 

1  202 

1  203 

1  2  0  4 

1  205 

1  206 

1  207 

1  206 

1  209 

12  10 

12  11 

12  12 

12  13 

12  14 

12  15 

12  16 

12  17 

12  18 

12  19 

1  220 

122  1 

1  222 

1223 

1224 

1  225 

122  6 

1227 

1  228 

1  229 

1  230 

123  1 

1232 

1  233 

1234 

1235 

1  236 

1  237 

1238 

1239 

1  240 

124  1 

1  242 

124  3 

124  4 

1245 

12  4  6 

1  247 

1248 

1249 

1  250 

125  1 

1  252 

1253 

1  254 

1  255 

125  6 

1  257 

1  258 

125  9 

1  260 

12  6  1 

1  262 

12  63 

12  64 

1265 

1266 

1  267 

1268 

12  69 

1  270 

127  1 

1  272 

1  273 

1  274 

1275 

127  6 

1  277 

1  278 

1  279 

1  280 

128  1 

1282 

1283 

1  284 

1285 

1286 

1287 

1288 

1289 

1290 

129  1 

1  292 

129  3 

129  4 

1  295 

1  29  6 

129  7 

129  8 

129  9 

1  300 

1  30  1 

1  302 

1  303 

1  304 

1  305 

1  306 

1  307 

1  308 

1  309 

13  10 

13  11 

13  12 

13  13 

13  14 

13  15 

13  16 

13  17 

13  18 

13  19 

1  320 


1  47 


F VEH  s AVEH 
CO  TO  146 


1  52 
1  S3 


LIGHTS  RED  ON 
FVEH  s  AVEH 
LVEH  s  JUN(PL 
CCNP  s  CCNP  4 
CARS ( AVEH , 1 ) 

I F ( CARS (AVEH, 
DC ARS ( AVEH )  = 


ALL  ARMS 

,  2  ) 

1 

=  CARS (AVEH, 1 ) 
1 ) . CT  O )  GO  TO 
DCARS ( AVEH )  ♦ 


-  1 
1  53 
1 


1  F  (  (  CARS  (  AVEH  ,  1  )  4  1  ]  EC  O)  NSTOP  (PL  ] 

VRED  s  VRED  4  1 

AVEH  r  CARS ( AVEH , 4 ) 

lF(AVEH.NE.O)  GO  TO  151 

I F ( JUN ( P L , 27 ) . NE  O )  GO  TO  137 


NS  TOP (  P  L  )  4  1 


9  153 


FIRST  SECOND  OF 
JUN (  P  L  ,  27  )  s  3 
I  F  (  VRED  GT  .  JUN  (  P  L 
I F (  VRED  .  EC  .  JUN (  P  L 
JUN ( PL , 26 )  =  0 

GO  TO  137 
JUN ( P  L  ,  2  6  )  s 
JUNIPL  ,  28  )  s 
1 F ( JUN ( PL , 26 ) 
WRITE! 6, 1 OOO ) 


ALL  RED  CHECK  THAT  LINK  NOT  SATURATED 


28  )  ) 
28  )  ) 


GO 

GO 


TO 

TO 


1  54 
1  58 


.  26  ) 


JUNIPL 
VRED 

.  L  E  .  5  )  GO  TO 
JUN (  P  L  ,  2  6  )  , 


1  37 

JS  T (  P  L  ) 


WRITE! 6, 1001 ]  VRED 

ABANDON  FACILITY  FOR  0 V E R S A T U R A T E D 
1 F ( JUN ( P L , 2 6 ) . EO . 1 OO )  GO  TO  23 
GO  TO  137 


STOPLINES  CHANGE  1 OO  IF  REOD 


15  5  AN  L  K  =  -  40 
GO  TO  139 


IF( VRED.GT 
GO  TO  9153 


10)  GO  TO  154 


161  1  F (  RT3  .  EO .  1  )  GO  TO  119 

I F  (  R  T  3  EO  O )  GO  TO  162 

:  RIGHT  TURN  BLOCKED 

OCN(TEMP)  s  OCN(TEMP)  4  1 

I F  ( OTMP (3))  131,131,2204 

1  RESET  SATURATION  FLOW  CARRY. 
2204  JUN  (  P  L  ,  1  1  )  =  1 OO 

GO  TO  131 


LOOK  TO  SEE  WHETHER  RIGHT  TURNS  ARE  STOPPED 
RT 1  s  JUN (PL ,21 ) 

RTDET  =  O 

IF  NO  OPPOSING  STOPLINE  GO  TO  164 
IF(RTI.EOO)  GO  TO  164 
R  T  2  s  JUN ( RT  1  ,  1  2  ) 

IF  OPPOSING  FLOW  STOPPED  GO  TO  164 
I F ( RT2 . LE . O )  GO  TO  164 
R  T  2  =  JUN (  RT 1  ,  1  ) 

IF  NO  VEHICLES  AT  OPPOSING  STOPLINE  GO  TO  5164 
I F  ( R  T  2  .  EQ  . O  )  GO  TO  5  164 
DISREGARD  OPPOSING  LEFT  TURNING 
I F (  CARS  I  RT2 , 2 )  .  EO  .  2 ) GO  TO  165 
IF  ( CARS ( RT2 , 1 ) . GT . 5 )  GO  TO  164 


VEHICLES 
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I  F 

( C ARS ( RT2 

,  2  ) 

.  EO 

1  )  GO 

TO 

1163 

I  F 

(  JUN (  RT  1  . 

22  ) 

.  GT  . 

1  OOO  ) 

GO 

TO  165 

GO 

TO  3163 

1163 

1  F 

( JUN ( RT 1 

,  22 

)  .  GE 

.  1  OOO 

)  GO 

TO  2  1 

I  F 

( JUN ( RT 1 , 

22  ) 

.  GE  . 

1  OO  ) 

GO  TO  165 

GO 

TO  3163 

2  163 

I  F 

(  JUN (  RT  1  , 

22  ) 

-  1 OOO  .  GE 

1  OO  ) 

GO  TO 

C  RIGHT  TURNERS  BLOCKED 

3163  IF(RT3.E0.3)  GO  TO  2002 

R  T  3  =  2 

OCN(TEMP)  s  OCN(TEMP)  +  1 

IF  (OTMP (3) )  131,131,2206 

C  RESET  SATURATION  FLOW  CARRY. 


2206 

JUN (  P  L  ,  1  1  )  = 

1  OO 

GO  TO  131 

C 

RIGHT  TURNERS 

NOT  BLOCKED 

1  64 

I F (  R T  3  .  EO  .  3  ) 

GO  TO  167 

R  T  3  =  1 

GO  TO  119 

c 

LOOK  AT  NEXT 

CAR 

1  6  5 

R  T  2  =  CARS  (  R  T  2 ,  4  ) 

GO  TO  163 

c 

L  OK 

AT  THE  FIRST 

TWO  DETECTORS  UPSTREAM 

FROM  THE  S  TOP  L  I NE 

5  164 

I F  ( RTDET  -  1 

)  5001,5002,164 

500  1 

RT 1  =  JUN ( RT 1 

,  30  ) 

c 

RT  1 

IS  THE  FIRST 

DETECTOR  UPSTREAM  FROM 

THE  S  TOP  L 1 NE  . 

RTDET  =  RTDET 

4  1 

R  T  2  r  DET ( RT 1 

.  1  ) 

c 

R  T  2 

IS  THE  FIRST 

CAR  ON  DETECTOR  RT 1 . 

GO  TO  163 

5002  RTDET  s  RTDET  ♦  1 

RT 1  =  DET ( RT 1 , 1 3 ) 

C  R  T 1  IS  NOW  THE  SECOND  DETECTOR  FROM  THE  STOPLINE. 

C  IT  IS  FOUND  BY  LOOKING  FOR  THE  FIRST  DETECTOR  UPSTREAM  FROM 

C  THE  PREVIOUS  DETECTOR. 

IF  (  R  T  1  )  164,1  64, 5003 

5003  R T  2  s  DET (  RT 1  ,  1  ) 

C  R  T  2  IS  THE  FIRST  CAR  ON  DETECTOR  R  T  1  . 

GO  TO  163 


16  6  R  T  3  =  3 

AVEH  s  JUN (  P  L  ,  1  ) 

JUNIPL. 23)  =  O 

7166  I F ( CARS ( AVEH , 2 ) . NE . 3 )  GO  TO  8166 
I F ( C ARS ( AVEH , 1 )  CT . 1 ) GO  TO  8166 
JUN  (PL,  23)  =  JUN(PL,  23)  +  1 

8166  AVEH  s  CARS (AVEH, 4 ) 

IF(AVEH.NEO)  GO  TO  7166 

IF( JUNJPL.23)  EO.O)  GO  TO  2002 

GO  TO  162 


C  RELEASE  VEHICLES  IN  RIGHT  TURN  BOX 


1  67 

RT7  s 

JUN (  P  L 

.  22  ) 

I  F  |  R  T  7 

GE  . 

1 OOO )  GO  TO  2167 

1 

1  67 

I  F  (  R  T  7 

GE  . 

100)  GO  TO  3167 

GO  TO 

4  167 

2 

1  67 

R  T  7  s 

R  T  7 

- 

1  OOO 

GO  TO 

1167 

3 

1  67 

R  T  7  s 

R  T  7 

1  00 

4 

1  67 

I F ( JUN ( PL , 

23 

)  .  L  T  .  R  T  7 )  GOTO 

. 


■ 


132  1 

1322 

1323 

1  324 

1  325 

1  32  B 

1327 

1328 

1  329 

1  330 

133  1 

1  332 

1333 

1  334 

1335 

1  336 

1337 

1338 

1339 

1  340 

134  1 

1  342 

134  3 

1  344 

1  34  5 

134  6 

1347 

1348 

1349 

1  350 

135  1 

1  352 

1  353 

1354 

1  355 

135  6 

1  357 

1  358 

135  9 

13  60 

136  1 

1  362 

1363 

13  64 

1365 

1366 

13  67 

1368 

1369 

1  370 

1  37  1 

1  372 

1  373 

1  374 

1  375 

1  37  6 

1  377 

1  378 

1379 

1380 

138  1 

1  382 

1  383 

1384 

1  385 

138  6 

1  387 

1388 

1389 

1390 

1  39  1 

139  2 

139  3 

139  4 

1  39  5 

139  6 

139  7 

139  8 

1  399 

1  400 

140  1 

1  402 

1403 

1  404 

1  405 

1  406 

1  407 

1  408 

1409 

14  10 

14  11 

14  12 

14  13 

14  14 

14  15 

14  16 

14  17 

14  18 

14  19 

1  4  20 

142  1 

1  4  22 

142  3 

14  2  4 

1  4  25 

142  6 

1427 

1  428 

1429 

1  430 

143  1 

1  432 

1433 

1434 

1  435 

1436 

1  437 

14  38 

1439 

1440 


C 


c 


c 


c 

c 


c 


c 


c 


c 


c 

c 


c 

c 


JUN (  PL  , 23 )  s  R  T  7 

168  R  T  6  =  JUN (PL.23) 

JUN ( P  L  ,  23  )  =  O 

CCNP  =  CCNP  -  R  T  6 
VRED  =  VRED  -  R  T  6 
D 1 RN  =  3 

TEMP  =  3 

S ATN (  3  )  =  1 000 

R  T  4  s  O 

LANES  s  JUN (  P  L  ,  1  4  ) 

IF(LANES.LT.O)  LANES  =  -LANES 
AVEH  s  JUN (PL,  1) 

169  IFIRT6.LE.0)  GO  TO  178 

170  IF(AVEH.EO.O)  GO  TO  177 

LOOK  FOR  CARS  TURNING  RIGHT  WITH  TIMERS  EXPIRED 
I F  (  (  CARS ( AVEH  ,  2 )  .  EO  .  3  )  .  AND  .  (  CARS  ( AVEH  ,  1  )  .  LE  .  O )  )  GO  TO  172 

171  R  T  4  =  AVEH 

R  T  4  HOLDS  LAST  CAR  NOT  PROCESSED 
AVEH  “  CARS (AVEH, 4 ) 

GO  TO  170 
RELEASE  CAR 

172  R  T  6  =  R  T  6  -  1 

GO  TO  118 


RETURN  POINT  AFTER  VEHICLES  HAVE  BEEN  RELEASED 

173  R  T  5  s  CARS  ( AVEH ,  4  ) 

CARS  (  AVEH  ,  4  )  s  O 

174  IF(RT4  .  E  0  ■  0 )  GO  TO  176 
CARS | RT4 , 4 )  s  RTS 

CLOSE  GAP  BETWEEN  LAST  VEHICLE  RTfl  AND  NEXT  VEHICLE  R  T  5 

175  AVEH  -  R  T  5 
GO  TO  169 

IF  RT4  IS  O  THEN  STORE  NEXT  CAR  RTS  AS  FIRST  ON  STOPLINE 

176  J  U  N ( P  L  ,  1  )  s  R  T  5 
GO  TO  175 


1  77  JUN  (  PL  ,  2  )  r  R  T  4 

LAST  VEHICLE  IN  OUEUE  ENCOUNTERED 
IF|RT4 .EO.O)  GO  TO  2002 
CARS  I  RT4  .  4  )  =  O 

GO  TO  2002 


ALL  RIGHT  TURNERS  IN  INTERSECTION  RELEASED 
178  IF(AVEH.IO.O)  GO  TO  177 
GO  TO  2002 


RETURN  POINT  AFTER  VEHICLES  HAVE  BEEN  RELEASED  AT  EXIT  POINT 

179  RTS  -  NLCAR 

GO  TO  174 

180  CCNP  =  Ml 

FVEH  =  JUNIPL,  1  ) 

L  VEH  =  JUN (PL,2) 

DO  2  12  J  £  1  ,  3 

TTT  s  JUNfPL, J+1 1 ) 

I F  ( TTT )  212,212,213 

2  13  TTT  =  JUN  (  P  L  ,  J  +  5  ) 

IF  (TTT)  212,212, 208 

208  ITTT  =  JUN ( P L , J+ 8 )  +  TTT 

IF  (ITTT  -  1O0)  209,212,212 

209  JUN ( PL , J+8 )  “  ITTT 
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GO  TO  212 
212  CONTINUE 
GO  TO  137 
END 

C  - - - - -  -  -  -  - . -  -  -  - . 

e  . . . . . - . - . 

SUBROUTINE  SVACT ( NDEMD ) 

IMPLICIT  INTEGER(A-Z) 

INTEGERM  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGER**  JUN, DET, ENTRY, JST,EST,DST. CARS, DTCN , NSTOP , OUTDAT , COUT , 
1MLANE,  BLANE,  L  T  H ,  V  E  L  0  ,  DETINT, 

2 JNST  ,  S VSTRT  , 

3MIN , MAX , EXTT ,MINGT , MAXGT , NST , DEMDET , EXTDET , DEM, NOST 
INTEGER**  S  VDMDT  ( 28  ,  4,2)  ,SVEXTT(28)  , S VEXDT |  28 , 4 ,  6 )  ,SVDEM(28,4)  , 
1SVMXGT (  28  )  ,  S  V  MA  X  (  2  8  ,  4  )  ,  EXTRGN ( 28 , 4  )  ,EXGN(28,4) 

I NTEGER*4  NGRN, NGREEN , GRNT , GREENT 

INTEGERM  FRCCNG (  28 , 4  ,  4  )  ,  NS  VEX ( 28 , 4  ,  4  )  ,  NWG  P  ,  NWMX 
REAL  *  8  TIM 

DIMENSION  J  U  N (  7  5  ,  3  O )  ,  DET (  120,  15)  ,DECTR(75)  ,  E  N  T  R  Y  (  40 , 6)  , 

1  J  S  T ( 7  5  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 

2  D  L  Y (  7  5  )  ,NST0P(75)  ,OUTDAT(  12,3),C0UT(5,2)  , 

3  S  A  T  N (  3 )  ,  C  0  U  N (  5  )  ,©CN(3)  , 

4TLST(28,23)  ,JNST(28)  ,CHANGE(28,2)  , 

5ML ANE (  6 , 8  )  ,BLANE(6,4)  ,LTH(75)  ,VEL0(75)  ,  DETINT(  120)  , 

6DUMJUN (  4  )  , MAS  T  J  N (  4  )  , 

7MI N ( 28 , 4 )  , MA  X  (  2  8  ,  4  )  ,EXTT(28)  ,MINGT(  28  )  ,MAXGT(28)  ,  NS  T  ^28  ,  4  )  , 
8DEMDET(28,4,2) , EXTDET ( 28 , 4 , 6) ,DEM(28,4) ,N0ST(28) 

DIMENSION  I  COMP  (  2  8  )  ,  ICH0P(28)  ,NNSKIP  (28)  ,  IRUN(28)  ,FST(28) 

COMMON  JUN , DET , DECTR, ENTRY , JST, DST , EST , CARS .MSEC , 

1 JTST , DTCN , DLY , NSTOP , OUTDAT , COUT , NOUT , NPER , 

2MLANE,  BLANE,  LTH.VELO,  DETINT,  BM,  BUS 
C0MM0N/C0M1  / S  A  T  N  ,  COUN.OCN,  VLTH, 

1ENDT, RNGE, SPEED, NVEH , UCST , LCST , RN , ©DELAY 
COMMON /C0M2/TLST , JNST , CHANGE , HFACT , NDUM, DUMJUN , MAST JN , 

1MIN, MAX, EXTT, MINGT, MAXGT, NST, DEMDET, EXTDET, DEM, NOST, NJN, EXT 
COMMON  / B  L  K  CMP /  SVDMDT , SVEXTT , S VEXDT  ,  SVMXGT , SVMAX , SVDEM, 

1  EXTRGN ,  EXGN  ,  SVEXT  ,  ICOMP,  JCHOP  ,  NNSK1P  ,  1RUN.FST 
COMMON  /BLKT1M/  PCHNGE(28) , MN JN , NGRN ( 28 , 4 ) , NGREEN ( 28 , 4 ) ,GRNT(28,4) 
1  , GREENT (28,4) 

COMMON  /BLKFCG/  F R C C N G , N S V E X , NWG P , NWM X 

COMMON  /BLKSVH/  S VS T ( 1 OO , 1 1 ) , S VD L (1 OO , 5 ) , NSP VEH , START , 

1  S VSTRT  (  1 ©O )  ,  I  PR  I  NT 
C  NUMBER  OF  J U N C T I  0 N S  =  N J N  . 

S  V  s  O 

C  DO  FOR  ALL  JUNCTIONS. 

DO  1  JN : 1 , N JN 
K  s  NOST  (  JN  ) 

C  NO  S.V.  DEMANDS  STORED  IN  ©UIESCENT  CYCLE 
IF  ( EXTRGN ( JN , 1 ) )  50,49,50 

50  00  51  ST  s  1  ,  K 
5  1  S  V  D  E  M ( JN , ST  )  s  O 
GO  TO  46 

C  LOOK  FOR  S.V.  DEMANDS. 

49  IF  ( NDEMD  -  2 )  41,41,42 

42  DO  43  S  T  s  1  ,  K 

DO  44  I s 1 , NOEMD 
0  *  SVEXDT(JN,ST,  I  ) 

IF  (D)  44,44,45 

45  SV  r  1 

DD  s  DET I  NT ( D ) / 1 OO 


. 
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14  4  1 

1442 

144  3 

144  4 

14  4  5 

144  6 

1447 

1448 

144  9 

1  450 

145  1 

1452 

14  53 

1454 

1455 

14  5  6 

14  5  7 

1458 

14  59 

14  60 

14  6  1 

14  62 

14  63 

14  64 

14  65 

14  6  6 

14  67 

14  68 

14  69 

1  470 

147  1 

1  472 

14  7  3 

1474 

14  75 

14  7  6 

14  77 

1478 

1479 

14  80 

148  1 

1482 

1483 

14  84 

1485 

148  6 

1487 

1488 

148  9 

14  90 

149  1 

14  9  2 

14  9  3 

14  9  4 

14  9  5 

14  9  6 

14  9  7 

14  9  8 

14  9  9 

1  500 

1  50  1 

1502 

1  503 

1  504 

1  505 

1  506 

1  507 

1  508 

1  509 

15  10 

15  11 

15  12 

15  13 

15  14 

15  15 

15  16 

15  17 

15  18 

15  19 

1  520 

15  2  1 

1  522 

1523 

1524 

1525 

1526 

1  527 

1  528 

1  529 

1  5  30 

1  53  1 

1532 

1  533 

1  534 

1  535 

1536 

15  37 

15  38 

1  539 

1  540 

154  1 

154  2 

154  3 

15  4  4 

1545 

154  6 

1  547 

154  8 

15  4  9 

1  550 

155  1 

1552 

1553 

1554 

1555 

1  556 

1557 

1  558 

1559 

1  560 


IF  (DD)  44,44,47 

47  WRITE  (6,103)  MSEC.DST(D) 

103  FORMAT  ('  ****  MSEC  ,  I7,5X,  'BUS  DETECTED  AT ' 

1  , ' DETECTOR ',15) 

SVDEM(JN.ST)  s  SVDEM(JN.ST)  ♦  DD 
44  CONTINUE 
43  CONT I NUE 
GO  TO  46 

4  1  DO  3  ST  =  1  ,  K 

DO  2  1=1,2 

D  =  S VDMDT { JN.ST, I ) 

IF  (  D  )  2,2,4 

4  S  V  =  1 

DD  =  DET I  NT  (  D  )  /  1  OO 

C  FOR  PASSAGE  S.V  DETECTORS  ADD  NEXT  LINE 
IF  (  DD -  20 )  5,2,2 

5  SVDEMI JN,ST)  r  SVDEM(JN.ST)  ♦  DD 

IF  ( DD )  2,2,40 

40  IF  (IPRINT.EO.O)  WRITE  (6,101)  MSEC 
101  FORMAT  ('  ****  MSEC  ='  ,I7,5X,  'BUS  DETECTED  AT  ' 

1  , 'DEMAND  DETECTOR') 

2  CONTINUE 

3  CONTINUE 

C  NO  EXTENSIONS  SET  IN  THE  TRUE  INTERGREEN. 

46  IF  (TLST(JN,2)  )  1,53,52 

53  IF  (TLST(JN,3)  )  56,1,1 

56  AA  =  (  T  L  S  T  (  J  N  ,  1  )  +  T  L  S  T  (  J  N  ,  3  )  )  /  1  OOO  4-  HFACT 
IF  ( AA )  1,1,54 

54  RST  =  -  TLST  (  JN ,  1  ) 

GO  TO  55 

C  RUNNING  STAGE  NUMBER 
52  RST  =  TLST (  JN  ,  1  ) 

55  S VEXTT (  JN  )  = S VEXTT (  JN  )  -  1 
C  LOOK  FOR  S.V.  EXTENSIONS. 

DO  13  1=1,6 

D  =  S VEXDT ( JN ,  RST ,  I  ) 

IF  (D)  13,13,7 

7  SV:  -  1 

IF  (  DET I  NT  (  D  ) /  1 OO )  13,13.14 

14  SVEXTT ( JN ) =S VEXT 
GO  TO  12 
13  CONTINUE 

C  IF  NO  S.V.  DETECTORS  GO  TO  NEXT  JUNCTION. 

12  IF  (SV)  48,6,48 
C  IF  IN  MIN  GREEN  NO  CHANGE 

48  IF  (MINGT(JN))  17,17,1 

C  LOOK  FOR  S.V.  EXTENSIONS. 

17  1  F ( S VEXTT  (  JN )  )  18,18,19 

C  ZERO  DEMAND  ON  RUNNING  STAGE , THEN  LOOK  FOR  S.V.  DEMANDS 

1 8  SVDEMI JN , RST ) sO 
DO  20  ST  s  1  ,  K 

IF  (SVDEMt JN.ST) )  20.20,21 

20  CONTINUE 

C  NO  S.V.  EXTENSION  OR  DEMAND  CO  TO  6 
GO  TO  6 
C 

C  PROCESS  SPECIAL  VEHICLE  EXTENSION. 

C 

C  CHECK  WHETHER  CHANGE  CALLED  BY  V. A.  ROUTINE. 

19  IF  ( CHANGE ( JN , 1 ) )  1,1,23 
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23  IF  (MAXGT(JN) )  25,25,26 

C  GAP  CHANGE  OVERRIDEN 

26  CHANGE ( JN , 1 ) :0 
CHANGE l  JN  ,  2  )  =  O 

IF  (IPRINT.EO.O)  WRITE  (6,100)  JNST(JN) 

IF  (MSEC  -  START  )  1,1,11 

11  NSVEX  ( JN  ,  RST  ,  2 )  =  NS  V E X (  J N  ,  RS T  ,  2  )  +  1 

I F  ( NWGP )  1,8,1 

8  NSVEX ( JN , RST , 1 )  s  N S V E X ( J N , R S T , 1 )  +  1 

NWGP  s  1 

GO  TO  1 

C  MAX  CHANGE  SET  AND/OR  DECREMENT  MAX  TIMER 
25  IF  (SVMXGT(JN) )  28,28,29 

28  SVMXGT (  JN  )  s  S  VMAX  (  JN  ,  RST )  +  1 

29  S VMX GT ( JN  )  s S VMXGT  ( JN  )  -  1 

IF  (SVMXGT(JN) )  30,30,31 

C  OVERRIDE  V . A  MAX  CHANGE  AND  FORCE  V.A  ROUTINE  TO  CALL  FOR  MAX 
C  CHANGE  AGAIN  NEXT  SECOND. 

3 1  CHANGE ( JN, 1 ) =0 
CHANGE (  JN  ,  2  )  :  O 

IF  (  IPRINT.EO.O)  WRITE  (6,100)  JNST(JN) 

MAXGT  (  JN  )  :  1 

IF  (MSEC  -  START)  1,1,15 
15  NSVEX  ( JN  ,  RST  ,  4  )  s  NS  V E X (  J N  ,  RS T ,  4  )  +  1 

I  F  (  NWMX  )  1,10,1 

10  NSVEX ( JN , RST , 3 )  s  N S V E X l J N , RS T , 3 )  +  1 

NWMX  s  1 
GO  TO  1 

30  SVEXTTt  JN  )  *0 

CHANGE (  JN  ,  2  )  =  3 

SVMXGT (  JN  )  =0 
DEMI  JN ,  RST  )  =  1 

D  sSVDMDT (  JN  ,  RST  ,  1  ) +SVDMOT (  JN , RST ,  2  ) 

C  PUT  IN  S.V.  DEMAND  IF  ALLOWED  ON  THIS  STAGE 
IF  (D)  36,36,33 

33  SVDEMI JN  ,  RST  )  =  1 

IF  (IPR1NT)  36,60,36 

60  WRITE  (6,102)  MS E C , J N S T ( J N ) , C H A N G E ( J N , 2 ) , C H A N G E ( J N . 1 ) 

36  DO  34  ST  =  1  ,  K 

IF  (ST- RST)  35,34,35 
35  IF  ( SVDEMI JN , ST ) )  34,34,21 

34  CONTINUE 

32  CALL  CMPN I JN , O , O , O ) 

MAXGT ( JN ) SO 
SVMXGT ( JN ) =0 
SVEXTT ( JN ) sO 

RST 1 9  s  RST  *  19 

GREENT ( JN , RST )  s  G  R  E  E  N  T  (  J  N  ,  RS  T  )  +  MS  E  C  -  P  C  H  N  G  E  (  J  N  )  -  T  L  S  T  (  J  N  ,  RS  T  1  9  ) 

NGREEN ( JN , RST )  : NGREEN ( JN , RST )  ♦  1 

PCHNGE(JN)  s  MSEC 

NWGP  s  O 

NWMX  s  O 

GO  TO  1 

6  IF  I  CHANGE!  JN,  1  )  )  1,1,9 

C  IF  MAX  GREEN  CALLED  PUT  IN  DEMAND. 

9  IF  (MAXCT(JN))  24,24,27 

24  DEMI JN , RS  T )  s  1 
MAX  GT 1 JN )  s  O 
GO  TO  32 

C  OTHERWISE  ZERO  DEMAND. 


15  6  1 

15  62 

15  6  3 

15  64 

15  65 

15  6  6 

15  67 

15  68 

15  69 

1570 

157  1 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1  580 

158  1 

1582 

1583 

1584 

1585 

158  6 

1587 

1588 

1589 

1590 

159  1 

159  2 

159  3 

159  4 

159  5 

159  6 

15  9  7 

15  9  8 

1599 

1  600 

1  60  1 

1  602 

1  603 

1  604 

1  605 

1  606 

1  607 

1  608 

1  609 

16  10 

16  11 

16  12 

16  13 

16  14 

16  15 

16  16 

16  17 

16  18 

16  19 

1  620 

162  1 

1622 

1623 

1  624 

1625 

1626 

1627 

1628 

1629 

1  6  30 

163  1 

1  632 

1633 

1634 

16  35 

1636 

1637 

1  638 

1639 

1640 

1  64  1 

164  2 

1  643 

164  4 

1  645 

164  6 

1  647 

1648 

164  9 

1  650 

165  1 

1652 

1653 

1654 

1655 

1  65  6 

1657 

1658 

1659 

1  6  60 

16  6  1 

1662 

16  63 

16  64 

16  65 

16  6  6 

1667 

16  68 

16  69 

1  670 

167  1 

1672 

1673 

1674 

1675 

1  67  6 

1677 

1  678 

1679 

1  680 


27  D  EM (  JN ,  RST )  =0 
MAX  GT (  JN  )  s  0 
GO  TO  32 

21  CALL  SVPDEMI JN ) 

IF  ( CHANGE ( JN , 2 )  -  3)  37,38,37 

38  WRITE  (6,102)  MS E C , J N S T ( J N ) , C H A N G E ( J N , 2 ) , C H A N G E ( J N , 1 ) 

37  S VMXGT ( JN )  =  O 

SVEXTT(JN)  =  0 
1  CONTINUE 
RETURN 

lOO  FORMAT  (  T  5  O ,  '  JUNCTION'  ,  13,  '  V.A.  CHANGE  OVERRIDEN  BY  ' 

1  ,  '  S  .  V  .  EXTENSION') 

102  FORMAT  ('  MSEC  s',  15,'  JUNCTION'  ,  13,  '  CHANGE',  12, 

1  '  OCCUR  I NG  STAGE  ',12) 

END 

C 

C 

c 

SUBROUTINE  SVPDEM(JN) 

IMPLICIT  INTEGER(A-Z) 

I  NTEGER*  4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGERS  JUN , DET , ENTRY , JST , EST , DST , CARS , DTCN , NSTOP , OUTDAT , COUT , 
1MLANE,  BLANE,  LTH,  VELO,  DETINT, 

2 JNS  T  ,  S  VS  TRT  , 

3MI N , MAX , EXTT , MI NGT , MAXGT , NST , DEMDET , EXTDET , DEM, NOST 
INTEGERS  S VDMDT (28,4,2)  ,SVEXTT(28)  ,  SVEXDT ( 28 , 4  ,  6  )  ,SVDEM(28.4)  , 
1SVMXGT  (  28  )  , S VMAX (28,4)  ,EXTRGN(28,4  )  ,EXCN(28,4) 

INTEGERS  N  G  R  N  (  2  8  ,  4  )  ,  NGREEN  {  28 , 4  )  ,GRNT(28,4)  ,  GREENT  (  28  ,  4  ) 

RE AL  *  8  TIM 

INTEGERS  FRCCNG  (28,4,4)  ,  NS  VE  X  (  2  8  ,  4  ,  4  )  ,  NWCP  ,  NWMX 
DIMENSION  JUN |  75 , 30 )  ,  D  E  T  (  120,  15)  ,DECTR(75)  ,  E  N  T  R  Y  (  4  O ,  6)  , 

1 J  S  T  (  7  5  )  ,  D  S  T  (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 

2  D  L  Y  (  7  5  )  ,  NSTOP  (  75  )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3SATNI3)  ,  C  0  U  N (  5  )  ,0CN(3)  , 

4TLST(28,23)  ,JNST(28)  , CHANGE (  28 , 2 )  , 

5ML ANE  (6,8)  ,BLANE(6,4)  ,LTH(7S)  ,VEL0(75)  ,  D  E  T 1 N  T (  120)  , 

6DUMJUN (  4  )  , MAS  T  J  N (  4  )  , 

7  M  1  N  (  2  8  ,  4  )  ,  MA  X  (  2  8  ,  4  )  ,  E  X  T  T  (  2-8  )  ,M1NGT(28)  ,MAXGT(28)  ,NST(28,4)  . 
8DEMDET (  28,  4  ,2)  ,  EXTDET  (28 ,4,6)  ,  DEM[  28  ,  4  )  ,N0ST(28) 

DIMENSION  I  COMP  (  2  8  )  ,  ICH0P(28)  ,NNSKIP(28)  ,  JRUN(28)  ,FST|28) 

COMMON  JUN,  DET,  DECTR,  ENTRY,  JST,  DST,  EST,  CARS, MS  EC, 

1JTST,  DTCN,  DLY,  NSTOP,  OUTDAT,  COUT,  NOUT,  NPER, 

2MLANE,  BLANE  ,  LTH,  VELO,  DETINT,  BM,  BUS 
C0MM0N/C0M1 /SATN, COUN.OCN, VLTH, 

1  ENDT  ,  RNGE  ,  SPEED  ,  NVEH  ,  UCST  ,  LCST  ,  RN  ,  ODELAY 
COMMON/ C0M2/TLST , JNST , CHANGE , HFACT , NDUM, DUMJUN , MASTJN , 

1M1N, MAX, EXTT, M1NGT, MAXGT, NST, DEMDET, EXTDET, DEM, NOST, NJN, EXT 
COMMON  /BLKCMP/  S V D MD T  ,  S V E X T T  ,  S V E X D T  ,  S V M X G T  , S V M A X  ,  S V D E M , 

1  EXTRGN  ,  EXGN  , S VEXT  ,  ICOMP,  I  CHOP  ,  NNSK  I  P  ,  IRUN.FST 
COMMON  /BLKTIM/  PCHNGE ( 28 ), MNJN , NGRN , NGREEN , GRNT , GREENT 
COMMON  /BLKFCG/  F R C C N G , N S V E X , NWG P . NWMX 

COMMON  /BLKSVH/  SVST | lOO , 1 1 ) , SVDL ( 1O0 , 5 ) , NSPVEH , START , 

1  S  VSTRT  (  1 OO  )  ,  I  PR  1  NT 

C  K  =  N  UMB  E  R  OF  STAGES  AND  RST  ^RUNNING  STAGE 
K  =  NOST  (  JN  ) 

RST:TLST( JN, 1 ) 

NEWS  T  =  RS  T 

C  FIND  THE  NEXT  STAGE  IN  THE  CYCLE  WITH  A  PRIORITY  CALL 
KK  =  K  -  1 

DO  2  SS  T  £  1  ,  KK 


C  CHECK  WHETHER  THIS  STAGE  IS  BEING  COMPENSATED. 

IF  ( EXTRGN (  JN  ,  NEWST )  )  4,16,4 

16  NEWS T = NS T ( JN , NEWS T ) 

C  SEE  IF  THIS  NEXT  STAGE  HAS  BEEN  CALLED  BY  AN  S.V.  DEMAND. 

IF  ( SVDEM ( JN , NEWST ) )  2,2,3 

2  CONTINUE 

C  IF  IN  COMPENSATION  CYCLE  MAY  STILL  HAVE  V.A  CHANGE 

4  I F  (  CHANGE  (  JN ,  1  )  )  5,5,6 

C  NO  V.A.  REQUEST  -  RETURN  . 

5  RETURN 

C  IF  ONLY  THE  RUNNING  STAGE  IS  LEFT  IN  THE  COMPENSATION  CYCLE  AND  A 

C  V.A.  CHANGE  HAS  BEEN  CALLED  AN  S.V.  DEMAND  IS  ALLOWED  -  GO  TO  16 

6  FF  s  FS  T (  JN  ) 

IF  (  NST  (  JN  ,  RST  )  -  FF  )  15,1,15 

1  IF  ( EXTRGN ( JN , FF ) )  15,16,16 

C  PUT  IN  V.A.  DEMAND  IF  HAVE  A  MAX  GREEN  V.A.  CHANGE. 

15  IF  ( MAXGT ( JN ) )  7,7,8 

8  DEM ( JN , RST ) =0 
MAXGT (  JN  )  s  O 

CALL  CMPN ( JN , O , O , O ) 

11  NGREEN ( JN , RST )  s  N G R E E N ( J N , R S T )  ♦  1 

RS  T 1 9  s  RST  ♦  19 

GREENT (  JN  ,  RST  )  =  GREENT (  JN  ,  RST ) +MSEC - PCHNGE ( JN )• TLST ( JN ,  RST  1  9  ) 

PCHNGE ( JN )  s  MSEC 

NWG  P  =  O 

NWMX  s  O 

RETURN 

7  DEM (  JN ,  RS  T )  s  1 
MAXGT(JN) £0 

CALL  CMPN ( JN , O , O , O ) 

GO  TO  11 
C 

C  REACH  LABEL  3  IF  NEWST  HAS  AN  S.V.  DEMAND  AND  IS  ALLOWED  BY  COMPENSAT 

3  I  F  (  CHANGE (  JN ,  1  )  )  9,9,10 

C  IF  CURTAILING  RUNNING  STAGE  MARK  *0R  COMPENSATION  AND  PUT  IN  V.A  DEM 

9  CHOP  £  RST 
DEM(  JN ,  RS  T )  s  1 
MAXGT(JN)sO 
Ml NGT  (  JN  )  s  O 
EXTT (  JN  )  sO 

S VEXTT  (  JN  )  s  O 
S VMXGT (  JN  )  s  O 
GO  TO  12 

C  IF  HAVE  A  V.A.  CHANGE  SET  V.A.  DEMAND. 

10  CHOP  s  0 

1 F  ( MAXGT (JN))  13,13,14 

1 3  DEM( JN , RST ) s 1 
MAX  GT (  JN  )  s  O 
GO  TO  12 

1 4  DEM( JN ,  RST  )  so 
MAXGT  ( JN  )  s  o 

12  CMPST.-RST 
ST  sSST  -  1 

17  CHANGE ( JN , 1 )= NEWST 

CHANCE (  JN ,  2  )  =  4 

FST(JN)  s  NEWST 

IF  (  1  PR  I  NT )  20.21,20 

21  WR I T  E (  6 ,  1 OO )  MSEC .  JNST (  JN ),  RST  ,  NEWST 
lOO  FORMAT!  '  MSEC  s',  15,'  J U N C T  I  0 N  '  ,  1 3  ,  '  PRIORITY  CHANCE  FROM'  ,  12,  'TO' 
1,12) 


■ 


. 


168  1 

1662 

1683 

16  8  4 

1685 

168  6 

1687 

1668 

1689 

1690 

169  1 

169  2 

1  693 

16  9  4 

169  5 

169  6 

169  7 

1  69  8 

1699 

1  700 

170  1 

1702 

1  703 

1  704 

1  705 

1  706 

1  707 

1  708 

1  709 

17  10 

17  11 

17  12 

17  13 

17  14 

17  15 

17  16 

17  17 

17  18 

17  19 

1  720 

172  1 

1722 

1723 

1724 

1725 

1  72  6 

1727 

1726 

1  729 

1  730 

173  1 

1  732 

1  733 

1734 

1  735 

173  6 

1  737 

1  738 

1  739 

17  40 

174  1 

174  2 

1743 

1  744 

1745 

174  6 

1  747 

1748 

17  4  9 

1  750 

175  1 

1  752 

1753 

1754 

1  755 

175  6 

1  757 

1758 

175  9 

1  7  60 

17  6  1 

17  62 

17  63 

17  64 

17  65 

17  6  6 

17  67 

17  68 

1769 

1  770 

1  77  1 

1  772 

1  773 

1  774 

1  775 

177  6 

1  777 

1  778 

1  779 

1  780 

178  1 

1782 

1783 

1  784 

1785 

178  6 

1  787 

1  788 

1  789 

1790 

1  79  1 

1792 

1793 

1794 

1795 

1  79  6 

1797 

179  8 

1  79  9 

1  800 


RST,  NEWS  T  )  ♦  1 


20  IF  (MSEC-START)  18,18,19 
19  FRCCNG ( JN , RST , NEWST )  s  FRCCNG ( JN 
18  CALL  CMPN ( JN , 1 , S T , CHOP ) 

GOTO  11 
END 

SUBROUTINE  READ 
IMPLICIT  1  NTEGER ( A*  2 ) 

INTEGERM  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 
INTEGERM  JUN, DET, ENTRY, JST, EST ,DST . CARS , DTCN 
1MLANE  ,  BLANE  ,  LTH,  VELO,  DETINT, 

2ENT 

R  E  A  L  *  8  TIM 

DIMENSION  JUN(75,30)  ,  DET  (  120,  15)  ,  DECTR (  75  )  ,ENTRY(40,6)  , 
1 JS  T ( 7  5  )  ,DST(  120)  ,EST(40)  ,CARS(7S0,4)  ,JTST{75)  ,DTCN(75)  , 

2  D  L  Y  ( 7  5  )  ,  N  S  T  0  P  (  7  5  )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3  S  A  T  N (  3  )  ,  C  0  U  N (  5  )  ,0CN(3)  , 

4MLANE (  6 , 8  )  ,BLANE(6.4)  ,LTH(75)  ,VEL0(75)  ,  D  E  T I N  T (  120), 

SENT (  8  ) 

COMMON  JUN,  DET,  DECTR,  ENTRY,  JST,  DST,  EST,  CARS, MS  EC, 

1  JTST,  DTCN,  DLY,  NSTOP  ,  OUTDAT ,  COUT  , NOUT  ,  NPER , 

2MLANE,  BLANE,  LTH,  VELO,  DETINT,  BM,  BUS 
COMMON/ COM  1 /SATN.COUN.OCN,  VLTH, 


NS  TOP  ,  OUTDAT  ,  COUT  , 


1  ENDT  ,  RNGE 

,  SPEED  ,  NV  EH , 

UCST  , 

L  CST  ,  RN 

, ODELAY 

9  9  8 

FORMAT ( 

'  t  ********** 

*  *  *  *  ' 

) 

9  9  9 

FORMAT ( 

4  G  1  0  ) 

1  OOO 

FORMAT ( 

G  1  0  ) 

1  OO  1 

FORMAT ( 

3  G  1  0  ) 

1  002 

FORMAT 

I  6  C  1  0  ) 

1  003 

FORMAT ( 

8  G  1  O  ) 

1  OOfl 

FORMAT ( 

' 

' , 'STOPLINE 

DATA  ' 

) 

1  005 

FORMA  T  ( 

'  o 

' , ' DETECTOR 

DATA  ' 

1 

1  006 

FORMAT ( 

' 

'  ) 

1  007 

FORMAT ( 

'  0 

'  ,  'VEHICLE  LENGTH 

' 

, G 1 O/ ' 0 ' , 'END  TIME 

1  G  1  0/ ' O ' 

,  ' 

VELOCITY  RANGE 

'  .  G  1  0/  ' O '  ,  'ENTRY 

SPEED 

1  008 

FORMAT ( 

'  0 

' , ' RANDOM  NUMBER 

SEED 

,  G  1  O  ) 

1  009 

FORMAT ( 

'  0 

' , ' NUMBER  OF 

VEHICLES 

,  G  1  0  ) 

10  13 

FORMAT ( 

'  0 

'  ,  'ENTRY  DATA '  ) 

10  14 

FORMAT ( 

'  0 

'  ,  'EXIT  DATA 

' ) 

10  16 

FORMAT 

1 3G 1 0 ) 

10  17 

FORMAT ( 

'  0 

'  ,  T8 ,  'STOPLINE  STORE'  .  15X,  'DETECTOR 

STORE ' 

1  1  9  X  ,  'ENTRY/EX  IT'  ) 

10  18 

FORMAT ( 

• 

' ,2G10,9X,2G10,9X 

, 2G 1 0 ) 

10  19 

FORMAT ( 

' 

'  ,2G10,9X,2G10) 

1020 

FORMAT ( 

' 

' ( T20, 'FAULT 

IN  JUNCTION 

DATA  AT 

G  1  0  ,  ' 

ERROR 

102  1 

FORMAT ( 

* 

' , T20 , 'FAULT 

IN  DETECTOR 

DATA  AT 

G10,  'ERROR 

1022 

FORMAT ( 

' , T20 , ' FAULT 

IN  ENTRY  DATA  AT  ' , G10 

,  '  ERROR 

102  4 

FORMAT ( 

' 

',8G10) 

1  032 

FORMAT ( 

1  8C4  ) 

1  023 

FORMAT ( 

' , T20 ,  'FAULT  IN 

OUTDAT 

AT  ' , G 1 0 , ' ERROR ' , G 1 O ) 

103  4 

FORMAT ( 

'  0 

'  ,  '  *  '  ,  G  5  ,  '*' 

,  8G7  ) 

1  035 

FORMAT ( 

' 

'  ,G7,7X,4G7) 

1  03  6 

FORMAT ( 

'  ,  UX.4G7) 

1037 

FORMAT ( 

' 

','*',65,'*' 

,  3  G  7  ) 

1  038 

FORMATS 

• 

',  ' *  '  , G5 ,  '*' 

,  3G7  , 

1  1  X  ,  '  *  ' 

,G5,'*',3G7) 

1  039 

FORMAT ( 

• 

G5 ,  ' * ' 

.  3G7  , 

1  1  X  ,  '  *  ' 

,  G  5  ,  ,  3  G  7  , 

1  1  X  ,  '  * 

'  ,  G5  , 

1040 

FORMAT ( 

•  0 

',  ' *  '  ,  C  5 ,  '*' 

,  4  G7  ) 

1  04  1 

FORMAT ( 

'  o 

'  ,  '  *  '  , G  5  ,  '*' 

,  4G7  , 

5  X  ,  '  *  '  , 

G5  ,  ' *  '  ,  4G7  ) 

1  04  2 

FORMAT ( 

'  o 

C5  ,  '  *  ' 

,  4C7  , 

5  X  ,  '  *  '  , 

G  5  ,  (4G7,5X,  '  *  '  , 

G5  .  '  * 

1043 

FORMAT ( 

'  ,  5G7  ) 

1  04  4 

FORMAT ( 

' 

'  ,  5  G  7 , 5X ,  5G7 

) 

'  ,  G  1  O  ) 


'  .  G  1  O  ) 
,  G  1  O  ) 

,  G  1  O  ) 


1  *  '  ,  3G7 ) 


4  G  7  ) 


153 


1045  FORMAT!'  '  ,  5  G  7 , 5  X  ,  5  G  7  .  5  X  ,  5  G  7  ) 

C  DATA  COLLECTION  ROUTINES,  COUNI  1  )  HOLDS  NUMBER  OF  DECISIONS 

C  READ  IN  JUNCTION  DATA 

40  1  P  L  =  1 

C  T=0  IMPLIES  NO  PRINTOUT  OF  COMPUTER  NUMBERS  FOR  J U N , D E T , E N T R Y 

READ  15,1016)  COUN ( 1 ) , T , ODE L AY 
C  STORE  JUNCTION  NUMBER 

C  STORE  NEXT  LINK  DECISION  NUMBERS,  THROUGH,  LEFT,  RIGHT 

C  STORE  SATURATION  FLOW 

C  STORE  NUMBER  OF  LANES 

C  STORE  VELOCITY 

C  STORE  DISTANCE  TO  NEXT  LINK 

402  READI5  ,  1002  ) JSTIPL)  , JUNIPL  ,21  I  , JUN|  PL  ,  221  ,  LTHIPL  )  ,  VELOlPL  ) 

1  ,  JUN (  PL  .  29  ) 

READI5,  1002IJUNIPL,  3),  JUNIPL,  6  )  .  JUNIPL,  12),  JUNIPL,  IS),  JUNIPL,  IS) 
READ(5,1002)JUN(PL,  4),  JUNIPL, 7),  JUNIPL,  13),  JUNIPL,  16),  JUNIPL,  19) 
READIS,  1002  ) JUN  I  PL  ,  5  ]  .JUNIPL,  8)  .JUNIPL,  14)  .JUNIPL  ,  17)  ,  JUNIPL  ,20) 
DO  403  J  =  9,11 

JUN I P  L  ,  J )  =  O 

403  CONTINUE 

DO  404  J  £  2  3 , 2  8 
JUN ( PL  ,  J  )  >0 

404  CONTINUE 

DO  9412  1=6,8 

I F ( JUN I P L , 1 ) . L E . O ) GO  TO  9412 
JUNIPL, I)=JUN(PL,I)/36 
9412  CONT 1 NUE 

DO  8412  1=15,17 

2  =  JUN I  P  L  ,  I  ) 

2  =  2/3  6+0 . 5 

JUN I  PL  ,  I  )  =  2 
8412  CONTINUE 

2  =  VEL  0  I P  L  ) 

2=2/3. 6+0 . 5 
VEL  0  I P  L  )  =  2 
JUN I  P  L  ,  1  )  =  O 

JUNIPL, 2)  =  O 

P  L  =  P  L  +  1 

I  F  I  P L  .  L E . COUN (  1  )  )  CO  TO  402 

C  . 

C  WRITE  STOPLINE  DATA 

WR  I TE  I  6  ,  1 004 ) 

WRI TE I  6  ,  99  8  ) 

P  L  =  1 

C  COOING  TO  LABEL  408  CALCULATES  HOW  MANY  DATA  BLOCKS  CAN  BE 

C  PRINTED  ON  THIS  LINE 

WR  I  TE I  6  ,  1006) 

4  0  5  IFICDUNl  1  )-  (PL  +  1  )  (406,407,408 

406  WRITE!  6,  1040) JSTIPL  I  ,  (JUNIPL,  I  )  ,  I  =21  ,22)  ,  VELOlPL)  ,  L  T  H I  P  L  ) 
WRITEI6,  1043)  (JUNIPL,  1  )  ,  1=3,  6,3)  ,  IJUNlPL,  I  )  ,  1  =  12,  18,3) 

WRITEI6,  1043)  (JUNIPL,  I  )  ,  1  =4,7,3)  ,  (JUNIPL,  I  J  ,  1  =  13,  19,3) 

WRITE!  6,  1043)  IJUNlPL,  I  )  ,  I  =5,8,3)  ,  (JUNIPL,  I  )  ,  1  =  14,20,3) 

CO  TO  409 

407  WRITEI6,  1041  ] JSTIPL  )  ,  (JUNIPL,  I  )  ,  1=21  ,22)  .VELOlPL)  ,  LTHIPL)  , 
1JSTIPL+1 ) , (JUNIPL+1 , I ) , I =21 , 22) , VELOlPL*! 1 , LTHlPL+1 ) 

WR!TE(6,1044)(JUN(PL,I),I=3,6,3).(JUN(PL,I),I=12,18,3), 

1  (JUNIPL+1  ,  I  )  ,  1=3,  6,  3)  ,  |JUN(PL+1  ,  I  )  ,  1  =  12,  18,3) 

WRITE!  6,  1044)  (JUNIPL,  1  )  ,  1=4, 7,  3)  ,  (JUNIPL,  I  )  ,  I  =  13,  19,3)  , 
1(JUN(PL+1,I),1=4,7,3),|JUN(PL+1,I),I=13,19,3) 

WRITEI6,  1044)  (JUNIPL  ,  I  )  ,  I  =5,8,3)  ,  (JUNIPL,  I  )  ,  1  =  14,20,3)  , 


. 


1  80  1 
1  802 
1  803 
1  8  0  A 
1  805 
1806 
1  807 
1  808 
1  809 
18  10 
18  11 
18  12 
18  13 
1  8  1  A 
18  15 
18  16 
18  17 
18  18 
18  19 
1  820 
182  1 
1822 
1  823 
1  82  A 
1  825 
1826 
18  27 
18  28 
1829 
18  30 
183  1 
1832 
18  33 
1  83A 
1  835 

1836 

1837 

1838 

1839 
1  8  AO 

1  8  A  1 

1  8  A2 
1  8  A  3 
1  8  A  A 
1  8  A  5 
1  8  A  6 
18  4  7 
1  8  A  8 
1  8  A  9 
18  50 
18  5  1 
18  52 
1853 
1  85A 
1855 
18  5  6 
1857 
18  5  8 
1859 
1  8  60 


186  1 
18  62 
18  63 
1  8  6  A 
18  65 
18  6  6 
18  67 
18  68 
1869 
1  870 
187  1 
1872 
1  873 
1  £  7  A 
1875 

187  6 
1  £77 

1878 

1879 
1  8  80 

188  1 
1882 
1  883 
1  88  A 
1885 
188  6 

1887 

1888 

1889 

1890 
18  9  1 
189  2 

1893 

1894 

18  9  5 
189  6 
1897 
189  8 

189  9 
1  900 

190  1 
1  902 
1  903 
190  4 
1  905 
1906 
1  907 
1  908 
1  909 

19  10 
19  11 
19  12 
19  13 
19  14 
19  15 
19  16 
19  17 
19  18 
19  19 
1  9  20 


),  Ic5,8,3)  (  (JUN(PL+1  ,  I  ),  1  =  14,20,3) 


1 ( JUN1PL+1 
GO  TO  409 

408  WR  I  T  E  (  6  ,  1042)  JST(PL  )  ,  ( JUN ( PL ,  I), 
1JSTIPL+1 ) , ( JUN ( PL ♦ 1 , I ) , 1=21 ,22), 
2JST(PL  +  2)  ,  (  JUN ( P  L  +  2 ,  I)  ,1=21  ,22)  , 
WR  1 T  E  (  6 ,  104  5)  (JUN(PL,  I  )  ,1=3,  6,  3) 
1  (  JUN ( P  L  +  1  ,  I  )  ,  1  =3,  6,3)  ,  ( JUN (  P  L  +  1  , 
2(JUN(Pl+2,  I  )  .  1=3,  6,3)  ,  I  JUN(PL42, 
WRITEI  6,  1 045  )  (  JUN I  P  L  ,  1  ),  1  =4,7,3) 
1  (JUN(PL4l  ,  I  )  ,  I  =4,7,3)  ,  ( JUN ( P  L ♦ 1  , 
2(  JUN( PL  +  2  ,  I  )  ,  I  =4,7,3)  ,  ( JUN ( PL+2 , 
WRITE(  6,  1045)  (  JUN (  P  L  ,  I  )  ,  1  =5,8,3) 
1  (  JUN ( P  L  +  1  ,  1  )  ,  1=5,  8, 3)  ,  (  JUN {  PL  *  1  , 
2(JUN(Pl+2, I ) , 1=5, 8, 3) , ( JUN (  P  L  +  2 , 
PL  =  PL+3 

1 F ( P L . L E . COUN ( 1 ) ) GO  TO  405 


1=21  ,22)  ,  VELO(PL)  ,LTH(PL) 
VELO  (  PL-M  )  ,  LTH  (  PL+  1  )  , 
VEL0IPL  +  2)  ,  L  T  H ( P  L ♦ 2  ) 

,  ( JUN (PL,  1),  1  =  12,  18,3), 
I),  1  =  12,  18,3), 

1), 1=12, 18, 3) 

,  (  JUN (PL.  1),  1  =  13,  19,3), 
1).  1  =  13,  19,  3), 

I),  1  =  13,  19, 3) 

.  ( JUN (PL,  I),  1  =  14,  20, 3). 

I  )  ,  1  =  1 4 , 20 , 3  )  , 

I  )  ,  I  =  1  4 , 20 , 3  ) 


409 


READ  IN  DETECTOR  DATA 
RE AD ( 5 , 1 OOO ) COUN ( 2 ) 

P  L  =  1 

STORE  DETECTOR  NUMBER 

STORE  NEXT  DECISION  DISTANCE  TO  NEXT 
STORE  PERCENTS  TURNING  LEFT  RIGHT  AND 
KB  =  O 
KM  s  O 


DECISION  AND  NUMBER  OF  LANES 
PERCENT  TURNING  LEFT 


3  READ ( 5 , 

1 003 ) DS  T  1  P  L  ) 

, ( DET ( PL 

,  I  )  ,  1  =  3 

1 DET ( P  L  , 

12  ) 

DET ( P  L  . 

14)  =  DET 1 P  L 

. 4 ) *DET 1 

P  L  ,  S  ) 

I F l DET ( P  L  ,  1 O )  -  7  )  3, 

1 , 2 

1  KB  =  KB 

+  1 

READ ( 5 , 

1003) ( B LANE ( 

KB  ,  I  )  ,  I 

=  1.4) 

DET (  P  L  . 
GO  TO  3 

11)  =  KB 

2  KM  =  KM 

4-  1 

READ ( 5 , 

1 003 )  1  ML ANE  ( 

KM , 1 ) . I 

=  1,8) 

DET (PL, 

11)  s  KM 

5  )  ,  (  DET (PL,  I),  1=8,  10) 


DET ( P  L 
DET ( PL 
DET (  P  L 
DET (  P  L 
DET  (  P  L 
DET ( PL 
PL=PL+1 
I  F  (  P  L  .  L  E 


1  )  =  O 

2  )  =0 
6  )  =0 
7  )  =0 

8)=10*DET(PL, 
9  )  =  1  0*DET (  P  L  , 


8  ) 
9  ) 


COUN ( 2 ) )  GO  TO  413 


WRITE  DETECTOR  DATA 
WR 1 TE ( 6 , 1 005 ) 

WR I TE (  6  ,  9  9  8  ) 

P  L  =  1 

.  I F ( P L . GT . COUN ( 2 ) ) GO  TO  8418 
WR  I T  E  (  6  ,  1034  )DST(  PL  )  ,  D  E  T  (  P  L  , 
1 DET  (  PL  ,  5  )  , DET  (  PL  ,  8  )  , 

1 F  (  D  E  T (  P  L  ,  10)  -  7)417, 

.  K  =  DET (  PL  ,  1  1  ) 

WRITE!  6,  1 035  )  DET (  P  L  , 

GO  TO  417 
i  K  =  DET(PL,  1  1  ) 

WR I TE ( 6 , 1 035 ) DET (PL, 


10)  ,  D  E  T (  P  L  ,3)  ,  DET|PL  ,  12)  ,DET(PL,4) 


DE  T  (  P  L  ,  9  ) 

415,416 

1 1 ) , ( BLANE IK, I ), 1=1 ,4) 


WR  I  TE (  6 
PL  = PL*  1 


11). 

1036) ( ML ANE ( K , I ) 


(  ML ANE  (  K  , 
,1=5.8) 


I  )  ,  I  =  1  ,  4  ) 


C 

84  18 


9  4  18 
C 
C 


C 

c 

c 

4  1  9 


C 


9  4  19 


1  1 


1  2 


1  3 
C 

1  4 


1  5 
1  6 
C 
C 


4  20 
4  2  1 

4  22 


GO  TO  414 

ZERO  DECTR  ARRAY 

L  =  COUN (  2  ) 

DO  9418  P  L  =  1  ,  L 

DECTR (  P  L  )  =  O 

CONT I NUE 


READ  ENTRY  DATA 
P  L  =  1 

ENTRY (  40 ,  6  )  =  O 

READ  (5,999)  COUN  (  3  )  ,  NOCHT 

READ  IN  DECISION  NUMBER 

READ  IN  PROBABILITY  OF  CAR  ENTERING  NETWORK,  NEXT  DECISION  AND 
DELAY  TIMER  IF  NECESSARY 

READ(5,999 ) EST ( PL ) , (ENTRYlPL, I ) , 1=3,5) 

ENTRY (  PL ,  1  )  =0 
ENTRY  (  PL  ,  2  )  =0 

ENTRY(PL,3)  =  1 O * E N T R Y ( P L , 3 ) 

Z  =  ENTRY  (PL,  31/364-0. 5 
ENTRY (  P  L  , 3  )  =  Z*  1  O 

ENTRY  ( P  L  ,  6  )  =0 

P  L  =  PL  4-  1 

I  F (  P L  .  L E  .  COUN (  3  )  ) GO  TO  419 
READEXIT  DATA 
PL  =  COUN (  3  ) 

READ (5,1 OOO ) COUN ( 5 ) 

NDATA  =  C  0  U  N (  5  ) 

END  =  C  0  U  N  (  3  ]  4-  C0UN(5) 

READ! 5, 1003)  ( ENT ( N ) . N = 1 . 8 ) 

1 F ( NDATA .  L  T  .  8  )  GO  TO  12 
DO  11  N  =  1  ,  8 
J  =  PL4-N 

EST (  J  )  =  ENT ( N ) 

CONT I NUE 
PL  =  P  L ♦ 8 

I F ( PL . EO . END )  GO  TO  14 
NDATA  =  NDATA-8 
GO  TO  9419 
DO  13  N  =  1  , ND AT A 
J  =  P  L  4-  N 

EST (  J  )  =  ENT  (  N  ) 

CONT I NUE 

ZERO  EXIT  POINT  ARRAYS 
N  L  =  COUN  (  3  )  4-  1 

TEND  =  END  4  1 
DO  16  P  L  =  NL  , TEND 
DO  15  N  =  1  .  6 
ENTRY ( P  L  , N )  =  O 

CONTINUE 
CONTI NUE 


WRITE  ENTRY  DATA 
WR  I  T  E (  6  ,  1013) 

WR  I TE (  6 ,  9  9  8 ) 

PL  =  1 

I  F  (  COUN (  3 )  *  I P  L ♦  1  )  )42 
WR  I  TE (  6 ,  1037 ) EST (  P  L  ) 
GO  TO  424 

WR  I TE  (  6  .  1 038  ) EST  (  P  L  ) 
1  EST (  PL*  1  )  ,  ( ENTRY  (PL* 


,422,423 

(  ENTRY ( PL  ,  I  )  , 

1=3,5) 

(ENTRYlPL,  1  )  , 

1=3.5) 

.11.1=3,5) 

19  2  1 

1  922 

19  23 

19  24 

1  9  25 

19  2  6 

1  9  27 

19  28 

1  929 

1  9  30 

19  3  1 

1932 

1  9  33 

1  934 

19  35 

19  3  6 

1  9  37 

19  38 

19  39 

1  9  40 

19  4  1 

194  2 

19  4  3 

19  4  4 

19  4  5 

19  4  6 

1947 

19  4  8 

19  4  9 

1  950 

19  5  1 

1952 

19  5  3 

19  54 

19  55 

19  5  6 

1957 

19  58 

19  59 

1  9  60 

19  6  1 

19  62 

19  63 

19  64 

19  65 

19  6  6 

19  67 

19  68 

19  6  9 

1  9  70 

19  7  1 

19  72 

1  973 

1974 

1  9  75 

19  7  6 

1  977 

19  78 

19  79 

19  80 

19  8  1 

19  82 

19  83 

1984 

19  85 

19  8  6 

19  87 

19  88 

19  89 

19  90 

19  9  1 

19  9  2 

19  9  3 

19  9  4 

1995 

199  6 

1997 

19  9  8 

19  9  9 

2000 

200  1 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

20  1  0 

20  1  1 

20  1  2 

20  1  3 

20  1  4 

20  1  5 

20  1  6 

20  1  7 

20  1  8 

20  1  9 

2020 

202  1 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

203  1 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 


CO  TO  424 

423  WRITE!  6,  1039)EST(PL)  ,  (  ENTRY ( PL  ,  I  )  ,  1:3,5)  , 

1  EST ( PL ♦ 1  )  ,  1  ENTRY  (PL  +  1  ,  I  )  ,  1  :3,5)  , 

2EST ( PL+2  )  ,  (ENTRYlPL  +  2,  1  )  ,  1:3,5) 

PL*PL+3 

I  F  (  P L  .  L E  .  COUN ( 3  )  ) GO  TO  420 
C  WRITE  EXIT  DATA 

424  WRITE(6, 1014) 

WR  I  TE  (  6  .  9  9  £  ) 

NDAT A  r  COUN ( 5 ) 

A  1  =  COUN (  3  )  ♦  1 

20  I F l NDATA . LT . 8 )  GO  TO  21 

A  2  =  A  1  4-7 

WRITE!  6,  1003  )  I  ES T (  N )  ,  N : A  1  , A2  ) 

NDATA  =  NDATA  »  8 

A  1  s  A  1  +8 

IF! (A1-1 ) .EO.END)  GO  TO  22 
GO  TO  20 

21  A2  :  A  1  4  NDATA  -  1 

WRITE!  6,  1003)  (  ES T  (  N  )  ,  N  =  A  1  , A2  ) 

C  REPLACE  ORIGNAL  NUMBERING  BY  PROGRAM  NUMBERING  FOR  STOPLINE 

22  F 1 N  :  COUN (  1  ) 

DO  8438  P  L  s  1  ,  F I N 
DO  438  I s 1 , 3 
TEST  =  JUN (PL,  1 +2  ) 

C  IS  NEXT  DEC  I S 1  ON  -  THRO ,  LEFT ,  R 1 GHT ,  AN  EXIT 

I  F ( TES T  .  EO  . O  )  GO  TO  438 
L  =  COUN (  2 ) 

DO  4  34  J  =  1  ,  L 

C  IS  NEXT  DE C I S I  ON  -  THRO  ,  L EFT  ,  R 1  GHT ,  A  DETECTOR 

IF(TEST.EO.DSTfJ) )G0  TO  436 

434  CONTINUE 
M=  COUN (  3  ) 

L  =  COUN (3)  ♦  C  0  U  N (  5  ) 

M:  M4  1 

DO  435  J  =  M,  L 

C  IS  NEXT  DEC  I S I  ON  -  THRO  ,  L EFT ,  R  1  GHT  ,  AN  ENTRY 

I  F (  TEST  .  EO  .  EST ( J )  ) GO  TO  437 

435  CONTINUE 

C  FAIL  MESSAGE 

WRITE!  6,  1020)  JSTIPL  )  ,  JUNfPL,  1+2) 

GO  TO  438 

C  STOPLINE  DAT A ,  DETECTORS  P 0 S  I  T I  V E  ,  E X  I  T S  NEGATIVE 

436  JUN (PL, 1+2) :J 
GO  TO  438 

437  JUN (PL, I+2):*J 

438  CONTINUE 
8438  CONTINUE 

C  CONVERT  RIGHT  TURN  OPPOSING  STOPLINE  NO. 

DO  441  PL: 1 , FIN 
TEST  =  JUN (  P  L  ,  2  1  ) 

I F ( TEST  .  EO  .  O  )  GO  TO  44  1 
DO  439  I  :  1  ,  F  I  N 

I  F  (  TES T  .  EO  .  JS T (  I  )  ) GO  TO  440 

439  CONTI NUE 

C  FAIL  MESSAGE 

WR  I TE  (  6  ,  1  020  )  JS T  (  P L  )  ,  JUN (  P L  ,  2 1  ) 

JUN (  P  L  ,  2 1  )  =  O 

GO  TO  441 

440  JUN (PL,21 ):I 


44  1  CONT I NUE 

C  . 

C  REPLACE  ORIGINAL  NUMBERING  BY  PROGRAM  NUMBERING  IN  DETECTOR 

P  L  =  0 

FIN  =  COUN ( 1 ) 

FIND  t  COUN ( 2 ) 

30  PL  s  PL  4-  1 

IF(PL.GT.FIND)  GO  TO  45 

MARK  =  O 

TEST  =  DET (  P  L  , 3 ) 

TYPE  =  DETIPL, 12) 

31  I F ( TYPE . EO  1 )  GO  TO  34 

DO  32  I  =  1  ,  F I ND 

I F ( TEST . EO . DST ( I ) ) GO  TO  33 

32  CONTINUE 

C  FAIL  MESSAGE 

WR  ITE(  6,  1021  )  DST(PL) 

33  I F ( MARK . NE . O )  GO  TO  41 
DET (  P  L  ,  3  )  s  I 

GO  TO  37 

34  DO  35  I  =  1.F1N 

I  F ( TEST  .  EO .  JST (  I  )  ) GO  TO  36 

35  CONTINUE 

C  FAIL  MESSAGE 

WR  I  TE (  6 ,  102  1  ) DST  (  P  L  ) 

36  I F ( MARK . NE . O )  GO  TO  41 

DET ( P  L  ,  3 )  =  I 

37  I  F (  DET (  P L  ,  1 O )  *  7 ) 30 , 38 . 39 

38  K  s  DETIPL, 1 1 ) 

TEST  =  B  L ANE  (  K ,  1  ) 

TYPE  =  BLANE ( K , 2 ) 

MARK  =  1 

GO  TO  31 

39  K  c  DET (  PL  ,  1  1  ) 

TEST  =  ML ANE ( K , 1 ) 

TYPE  =  MLANE ( K . 2 ) 

MARK  =  2 

GO  TO  31 

40  TEST  r  MLANE ( K , 5 ) 

TYPE  =  MLANE ( K , 6 ) 

MARK  =  3 

GO  TO  31 

41  I F ( MARK  -  2)42,43,44 

42  BLANE ( K , 1 )  =  1 

GO  TO  30 

4  3  ML ANE (  K ,  1  )  =  I 

GO  TO  40 

4  4  MLANE ( K  ,  5  )  =  I 

GO  TO  30 

C  . 

C  REPLACE  ORIGINAL  NUMBERING  BY  PROGRAM  NUMBERING  IN  ENTRY/EXIT 

45  FIN  s  COUN ( 3 ) 

DO  447  PL* 1 ,F1N 

TEST  s  ENTRY(PL,4) 

I F ( TEST  EO . O ) GO  TO  447 
L  s  COUN ( 2 ) 

DO  445  J: 1 , L 

I  F ( TEST  .  EO  DST ( J )  ) CO  TO  446 
445  CONTINUE 

C  FAIL  MESSAGE 


' 


. 


204  1 

2042 

204  3 

2044 

204  5 

204  8 

2047 

204  8 

204  9 

2050 

205  1 

2052 

2053 

2054 

2055 

205  6 

2057 

2058 

2059 

2060 

206  1 

2062 

2063 

2064 

2065 

2066 

20  6  7 

2068 

2069 

2070 

207  1 

2072 

2073 

2074 

2075 

207  6 

2077 

2078 

2079 

2080 

208  1 

2082 

2083 

2084 

2085 

208  6 

2087 

2088 

2089 

2090 

209  1 

209  2 

209  3 

209  4 

2095 

209  6 

209  7 

209  8 

209  9 

2  1  OO 

2  10  1 

2  1  02 

2  1  03 

2  1  04 

2  105 

2  106 

2  107 

2  108 

2  109 

2  110 

2  111 

2  112 

2  113 

2  114 

2  115 

2  116 

2  117 

2  118 

2  119 

2  1  20 

2  12  1 

2  122 

2  1  23 

2  124 

2  1  25 

2  126 

2  127 

2  128 

2  1  29 

2  1  30 

2  13  1 

2  1  32 

2  133 

2  1  34 

2  135 

2  136 

2  1  37 

2  138 

2  139 

2  140 

2  14  1 

2  142 

2  14  3 

2  144 

2  145 

2  14  6 

2  14  7 

2  148 

2  149 

2  1  50 

2  15  1 

2  152 

2  1  53 

2  154 

2  155 

2  15  6 

2  157 

2  158 

2  159 

2  1  60 


WRITE!  6,  1022)EST(PL)  ,  ENTRY  (  PL  , 4  ) 
CO  TO  447 

446  ENTRY (PL,4):J 

447  CONT I NUE 

C  CARRY  ON  READING  IN  DATA 

C  CO  TO  426 


C  READ  IN  VEHICLE  LENGTH,  END  TIME,  VELOCITY  RANGE.  INITIAL  SPEED 

426  C  H  N  0  =  O 

CALL  VARF  L  0  (  NOCHT  ) 

50  READI5,  1002  ) VLTH ,  ENDT  ,  RNGE  .SPEED 
TOTDET  =  C0UNI2] 

DO  200  I DET  =  1 , TOTDET 

DET(IDET,14)  =  DET(  1DET,  14  )  /VLTH 
200  DET(  IDET,  15)  =  (  D E T (  1  D E T  ,  1 4  )  +  1  )  / 2 

WRITE  (6,1100)  |  DST (  I J )  .  DET (  I J .  1 4  )  ,  DET (  I J  ,  1  5  )  ,  I  J  s  1,  TOTDET) 

IIOO  FORMAT  ('  DETECTOR,  NUMBER  OF  CARS  WHEN  THE  LIGHTS  ARE  RED' , 

1'  AND  GREEN '  ,  / ,  5 (  3  I  7  ,  5 X )  ) 

WRITE!  6,  1007)  VLTH.  ENDT,  RNGE, SPEED 
2  =  SPEED 

2  =  2/3  .  6 
2  =  2  +  0 . 5 
SPEED  =  2 

C  READ  IN  RANDOM  NUMBER  SEED  AND  NUMBER  OF  VEHICLES 

READ (5,1 OOO )  RN 
WR  I TE (  6 .  1 008  )  RN 
RN  =  GGUBFS (  RN  ) 

READ ( 5 , 1 OOO )  N VEH 
WR I TE ( 6 , 1 009 )  N VEH 


C  SET  UP  USEABLECAR  STORE  LIST 

DO  427  1 = 1 , NVEH 

CARS  (1,1)  s  O 

CARS (1,2)  =  O 

CARS (1.3)  =  O 

CARS ( I , 4 ) = I ♦ 1 
427  CONTI NUE 

CARS (NVEH, 4)  =  O 

UCS  T  =  1 
LCST  =  1 


C  2ER0  DELAY  COUNTERS 

X  =  COUN (  1  ) 

428  DO  429  1  =  1  ,  X 

D  L  Y  (  I  )  =  O 

JTS  T (  I  )  =0 

DTCN (  I  )  =  O 

NSTOP  (  I  )  =  O 

429  CONTINUE 


C  READ  OUT  PARAMETER  CARDS 

READI5, 1003 ) NPER , NOUT , ( (COUT( I ,J) ,  J  =  1 ,2) , 1=1 , NPER) 
I  F  (  NPER  .  EQ  O ) GO  TO  84  29 
K  =  1 

1  F  |  NOUT  .GT  .  6  ) K  =  2 
DO  9429  L  =  1  ,  K 
H  =  6  *  (  L  -  1  )  ♦  1 
M=  H  +  5 

R  E AD (  5  ,  1032)  (  ( 0  U  T  D  A  T (  I  ,J)  ,J=  1  ,3)  ,  I  =H,M) 

9429  CONT I NUE 
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DO  326  1=1, NOUT 

L  =  COUN ( 1 ) 

I  F (  OUTDAT  (  I  ,  2 )  .  EC  .  1  ) GO  TO  26 
L  =  COUN (  2  ) 

TEST  =  OUTDAT (1,3) 

DO  23  J  =  1  ,  L 

I F ( TEST . EC . DST ( J ) )  GO  TO  24 

23  CONTINUE 

WRITE!  6,  1  03  3  )  DS  T (  I  )  ,OUTDAT(  1  ,3) 
GO  TO  326 

24  OUTDAT (1,3)  =  J 

GO  TO  326 

26  TEST  =  OUTDAT (1,3) 

DO  27  J  =  1  ,  L 

I F  (  TEST  .  EC  .  JST (  J  )  )  GO  TO  28 

27  CONTINUE 

WRITE!  6,  1033  )  JST (  I  )  ,OUTDAT(  I  ,3) 
CO  TO  326 

28  OUTDAT (1.3)  =  J 

326  CONTINUE 


c 

c 

WRITE  OUT  PROGRAM 
DECISION  DATA 

NUMBERS 

AGA I  NS  T 

INPUT 

NUMBERS 

FOR 

STOP  L  I NE 

c 

c 

WRITE  OUT  PROGRAM 
DECISION  DATA 

NUMBERS 

AGA I  NS  T 

INPUT 

NUMBERS 

FOR 

DETECTOR 

c 

c 

WRITE  OUT  PROGRAM 
DECISION  DATA 

NUMBERS 

AGA I  NS  T 

INPUT 

NUMBERS 

FOR 

ENTRY/EXIT 

C  8  4  2  9  IF(T.EO.O)GO  TO  432 
C  WR1TE(6, 1017) 

C  WR I TE ( 6 . 1 006 ) 

C  L  =  COUN (  3 ) +COUN ( 5  ) 

C  DO  4  30  1  =  1  ,  L 

C  WRITE!  6,  1018)  I  , JST (  I  )  ,  I  ,DST(  I  )  ,  I  ,EST(  I  ) 

C  430  CONTINUE 
C  M=  COUN (  1  ) 

C  L  =  L  +  1 

C  DO  43 1  I  =  L  , M 

C  WR I TE ( 6 . 1 O 1 9 ) I , JST ( I ) , I , DST ( I ) 

C  431  CONTINUE 

C - CALCUATE.  THE.  PREIOUS.  DECISION.  POINT.  FOR.  OUEUE . 

C  432  N  =  COUN (  1  ) 

8429  N  =  COUN (  1  ) 

DO  1 OO  I  =  1  ,  N 
1 OO  JUN ( 1 , 30 )  =  O 

N  =  COUN (  2  ) 

DO  10  1  1  =  1  .  N 

10  1  DET (  I  ,  1  3  )  *  O 

DO  102  1  =  1  ,  N 

A  =  DET (  I  ,  3  ) 

C  IS  THIS  DETECTOR  FOLLOWED  BY  ANOTHER  DETECTOR  OR  A  STOPLINE? 
IF  (  D  E  T (  I  ,  12)  -  1)  103,104,103 

103  DET ( A ,  1 3  )  =  I 

CO  TO  102 

104  JUN ( A ,  30  )  =  I 

102  CONTINUE 

C  . - . 

C  CO  TO  START  OF  MAIN  CYCLE 

RETURN 
END 

SUBROUT  1  NE  SS VH (  N 1  ) 

C  SPECIAL  VEHICLE  SUBROUTINES 


2  16  1 

2  1  62 

2  1  63 

2  164 

2  165 

2  16  6 

2  167 

2  166 

2  169 

2  1  70 

2  17  1 

2  172 

2  1  73 

2  174 

2  175 

2  17  6 

2  177 

2  178 

2  179 

2  1  80 

2  18  1 

2  182 

2  183 

2  184 

2  185 

2  186 

2  187 

2  188 

2  189 

2  190 

2  19  1 

2  192 

2  19  3 

2  194 

2  195 

2  19  6 

2  19  7 

2  19  8 

2  19  9 

2200 

220  1 

2202 

2203 

2204 

2205 

2206 

2207 

2208 

2209 

22  10 

22  1  1 

22  12 

22  13 

22  14 

22  1  5 

22  16 

22  1  7 

22  18 

22  1  9 

2220 

222  1 

2222 

2223 

2224 

2225 

2226 

2227 

2228 

2229 

2230 

223  1 

2232 

2233 

2234 

2235 

2236 

2237 

2238 

2239 

2240 

224  1 

2242 

2243 

2244 

2245 

2246 

2247 

2248 

2249 

2250 

225  1 

2252 

2253 

2254 

2255 

2256 

2257 

2258 

2259 

22  60 

226  1 

2262 

2263 

22  64 

22  65 

2266 

22  67 

22  68 

2269 

2270 

227  1 

2272 

2273 

2274 

2275 

2276 

2277 

2278 

2279 

2280 


C 

C 

c 


c 


c 


c 


c 


THIS  MODULE  GIVES  MODE  2  OUTPUT 

READ  AND  STORE  SP.  VEH.  DATA  AT  START  OF  PROGRAM 
N 1  s  NUMBER  OF  STOP  LINES  AND  DETECTORS  IN  NETWORK 
IMPLICIT  lNTECER(A-Z) 

INTEGERM  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGERS  JUN  ,  OET  ,  ENTRY  ,  JST  ,  EST  ,  DST  ,  CARS  ,  DTCN  ,  NSTOP  ,  OUTDAT  ,  COUT 
1MLANE,BLANE.LTH,VEL0, DETINT, SVSTRT 
REAL*8  T  IM 

DIMENSION  JUN(75,30) , DET ( 120, 15) ,DECTR(7S) , ENTRY | 40 , 6 ) , 

1JSTI75)  ,  DST (  120)  ,  ES  T ( 40  )  .CARS  (750, 4)  ,JTST(75)  ,DTCN(75)  . 

2  0  L  Y (  7  5  )  ,  N  S  T  0  P ( 7  5  )  ,OUTDAT(  12,3)  ,CQUT(5,2)  . 

3SATN13)  .COUN(S)  ,0CN(3)  , 

4ML  ANE  (  6 ,  8  )  ,BLANE(6,4)  ,LTH(75)  ,VEL0(7S)  ,  D  E  T 1 N  T  (  120)  , 

5  S  V  S  T  (  lOO,  1  1  )  , S  V  D  L  (  100,5) 

COMMON  JUN , DET , DECTR , ENTRY , JST , DST . EST , CARS , MSEC , 

1 JTST  ,  DTCN  ,  DL  Y  ,  NSTOP  ,  OUTDAT  ,  COUT  ,  NOUT  ,  NPER , 

2MLANE  ,  BLANE,  LTH.VELO,  DETINT,  BM,  BUS 
COMMON /C0M1 /SATN.COUN.OCN, VLTH, 

1ENDT, RNCE, SPEED, NVEH , UCST , LCST , RN , ODELAY 
COMMON  /BLKSVH/  SVST  , SVDL  ,  NSPVEH , START  , 

1  SVSTRT ( lOO) , 1PRINT 

1000  FORMAT  (2C10) 

1 00 1  FORMAT  ( 7G 1 O ) 

1002  FOR  MA  T (  '  '.'SPECIAL  VEHICLE  DATA  NOT  FOUND') 

1004  FORMAT!'  ','********************') 

1 005  FORMAT ( '  ' ) 

1012  FORMAT! 'O' , 'INVALID  DECISION  POINT  CODE  IN  SVEH') 

1014  FORMAT!'  ',T20, 'FAULT  IN  S S V H ' , G 1 O , G 1 O ) 

1015  FORMAT!'  ',T2O,'N0  SPECIAL  CAR  DATA') 

1016  FORMAT  ('  '  , 3 G 6 , 3 G 1 O ,  2 G 6  ) 

1017  FORMAT!'  '.'SPECIAL  VEHICLE  DATA') 

1  READ  (5,1000)  N.NTHCAR 

N  =  NUMBER  OF  SP  VEHICLES  FOR  THIS  RUN 
IF(N.EO.O)  CO  TO  304 
PL:  1 

2  READ  (5,1001)  ( SVST | PL  ,  I  )  ,  I  :  1  ,  6  )  , S VST  I  PL  ,  8 ) 

S VST  (  PL  ,  7  )  s  O 

S  VS  T  (  P  L  ,  9  )  s  O 
S VST ( PL , 10)  s  O 
SVST | PL , 1 1 )  =  O 

IF(PL.EO.N)  GO  TO  300 
PL=PL+1 
GO  TO  2 

TYPE  O  BUS  JOURNEYS  ARE  NOT  ALLOWED. 

300  DO  4  I  :  1  ,  N 

IF  (SVST(  1  ,  8  )  )  9,9,4 

4  CONTINUE 
GO  TO  10 
9  DO  11  I  :  1  ,  N 

11  SVST!  1,8)  =  SVST!  I  .8)  +  1 

REPLACE  START  POINT  NUMBERS  BY  COMPUTER  DETECTOR  NUMBERS 
10  DO  302  PL  =  1  ,  N 

SVSTRT  (  PL  )  =  NTHCAR 

TEST  =  S  V  S  T (  P  L  ,  2  ) 

DO  301  I  s  1 , N 1 

1 F ( TES T . EO . DS T ( I ) )  GO  TO  303 

301  CONTINUE 

WR I TE  (  6  ,  1 O  1  4  )  PL  . S VST  (  PL  ,  2  ) 

302  CONTINUE 

PRINT  OUT  ALL  SP.  VEH.  DATA  BLOCKS 
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WRITE! 6, 1017) 


WR  I TE (  6  ,  1 004  ) 

WR I TE ( 6 , 1 005 ) 

DO  9302  PL  =  1 . N 

I  =  S VST (  P  L  ,  2  ) 
WRITE  (6,1016)  PL 

,  SVST (  PL 

.  1  )  . 

DST ( I ) 

9  302 

CONTINUE 

GENERATE  SPECIAL 
DO  9  303  K  =  1  .99 

DO  9  304  A  =  1  ,  4 

S  V  D  L  (  K  ,  A  )  s  0 

VEHICLE 

DATA 

QUEUE 

9  304 

CONTINUE 

S  V  D  L  (  K ,  5  )  S  K+1 

9  303 

CONTINUE 

S VDL ( 1 OO , 5 )  =  0 

NDSN  =  1 

MDST  6  1 

NDSN  =  NEXT  DATA 

RETURN 

STORE  NO 

MDSN 

303 

S VST (  PL  ,  2  )  s  1 

GO  TO  302 

304 

WRITE! 6, 1015) 

3 

RETURN 

(SVSTIPL.P)  ,  P  =  3  ,  6  )  ,  S  V  S  T  (  P  L  ,  8  ) 
IN  SVDL 


=  MAXIMUM  DATA  STORE  NO 


ENTRY  ISVH 

C  INITIATE  SPECIAL  VEHICLES  (ENTERED  ONCE  EACH  SECOND) 

IF(N.EO.O)  RETURN 
DO  8  P  L  =  1  ,  N 

I F ( SVST |  PL  ,  1)  .NE. MS  E  C  )  GO  TO  8 

C  IF  START  TIME  =  MSEC  ATTEMPT  TO  GENERATE  A  SP.  VEHICLE 

ANLK=SVST ( PL , 2 ) 

C  ANLK  =  START  POINT  (  A  DETECTOR  ) 

C  IF  NO  VEHICLES  AT  THIS  DETECTOR  GO  TO  6 

I F ( DET ( ANLK , 1 ) . EO . O )  GO  TO  6 
C  START  A  SPECIAL  VEHICLE  ON  THE  NTHCAR  VEHICLE. 

IF  (SVSTRT(PL)  -  1)  12,12,13 

13  SVSTRT ( PL )  =  SVSTRT! PL)  -  1 

GO  TO  6 

1 2  AVEH  s  DET ( ANLK ,  1  ) 

5  I F ( CARS ( AVEH , 3 ) . LT . O )  GO  TO  7 

C  CHANGE  FIRST  NON  SP  VEH.  INTO  A  SP.  VEH. | NEG . V E L OC I TY  s  SP.VEH.) 

CARS  (AVEH,  3)  :  •  CARS  ( AVEH ,  3  ) 

C  STORE  ACTUAL  VEHICLE  NUMBER 

S VST  (  P  L  ,  3  )  = AVEH 
S VST (  P  L  ,  2  )  =  O 

C  CALCULATE  TURNING  CODE 

P  s  P  L 
MARK4  =  5 

GO  TO  23 
95  GO  TO  8 

C  DELAY  INITIATION  BY  INCREMENTING  START  TIME 

6  SVST (  PL  ,  1  )  :S VST ( PL  ,  1  )  +  1 
GO  TO  8 

7  AVEH  s  CARS ( AVEH ,  4 ) 

IF(AVEH.EC.O)  GO  TO  6 
GO  TO  5 

8  CONTINUE 
RETURN 

C  . 

ENTRY  S VH  1  (AVI  ,  P  L  3 ) 


. 


■ 


228  1 

2282 

2283 

2284 

2285 

228  6 

2287 

2288 

2289 

2290 

229  1 

229  2 

229  3 

2294 

2295 

229  6 

229  7 

229  8 

229  9 

2300 

230  1 

2302 

2303 

2304 

2305 

2306 

2307 

2308 

2309 

23  10 

23  1  1 

23  1  2 

23  13 

23  14 

23  15 

23  16 

23  1  7 

23  18 

23  1  9 

2320 

232  1 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

233  1 

2332 

2333 

2334 

2335 

233  6 

2337 

2338 

2339 

2340 

234  1 

2342 

234  3 

234  4 

234  5 

234  6 

2347 

2348 

2349 

2350 

235  1 

2352 

2353 

2354 

2355 

235  6 

2357 

2358 

235  9 

2360 

236  1 

2362 

2363 

2364 

2365 

236  6 

2367 

2368 

2369 

2370 

237  1 

2372 

2373 

2374 

2375 

237  6 

2377 

2378 

2379 

2380 

238  1 

2382 

2383 

2384 

2385 

238  6 

2387 

2388 

2389 

2390 

239  1 

239  2 

239  3 

239  4 

2395 

239  6 

239  7 

239  8 

239  9 

2400 


C  GENERATE  SPECIAL  VEHICLE  TURNING  CODE 

C  AVI  t  ACTUAL  VEHICLE  NUMBER  FOR  THIS  SP.  VEHICLE 

C  P  L  3  s  DETECTOR  NUMBER 

C  TURNING  CODES  1  r  THROUGH  2  =  LEFT  3  r  RIGHT 

AVEH -  A  V  1 
AN  L  K  =  P  L  3 

IF(ANLK.LE.O)  RETURN 
MARK4  =  0 

C  LOCATE  CORRECT  SP.  VEH.  DATA  BLOCK 

P  c  1 


21  I F ( A VEH . EO . S VST ( P , 3 ) )  GO  TO  23 
P:P+1 

IF(P.GT.N)  GO  TO  22 
GO  TO  21 

22  WR]TE(6, 1002) 

RETURN 

C  TAKE  OUT  PRESTORED  TURNING  CODE  IF  THERE  IS  ONE 

23  0  £  4 

25  D  R  NW sS VST ( P , 0 ) 

IF(DRNW.EO.O)  GO  TO  1 OO 
TEMP  1  =  DR NW/  1 0 

CODE  s  D R NW -  1 O*  TEMP  1 
SVST(P,0)  s  TEMP  1 
IF( CODE . CT .0)  GO  TO  26 
1 OO  0=0+1 

I F ( 0 .  L  E  .  6 )  GO  TO  25 
GO  TO  27 

C  STORE  TURNING  CODE  IN  VEHICLE  AND  RETURN 

26  I F ( CODE . GT . 3 )  GO  TO  27 

CARS ( A VEH , 2 )  =  CODE 

GO  T  0  2  1  O 

C  NO  PRESTORED  CODES ,  GENERATE  RANDOM  TURNING  CODE 

27  RNS  =  GGUBFS ( lOOOO)  +  1 

I F ( RNS . L E . DET ( AN L K , 8 ) )  GO  TO  28 
R  =  DET ( ANLK , 8 )  +  DET(ANLK,9) 

I F ( RNS . LE . R )  GO  TO  29 
CARS  ( A VEH ,  2  )  =  1 
GO  TO  210 

28  CARS  ( AVEH  ,  2  )  =  2 
GO  TO  210 

29  CARS  ( AVEH ,  2  )  =  3 
210  TEMP  s  DECTR(ANLK) 

I F ( MARK4 . £0 . 5 )  GO  TO  8 
RETURN 


ENTRY  S VEH ( A  1  , A2 , A3  ,  A4  ,  A5  ) 

C  STORE  AND  PRINT  SPECIAL  VEHICLE  OUTPUT  DATA 

C  ENTERED  WHENEVER  A  SPECIAL  VEHICLE  REACHES  A  DECISION 

C  TYPE  1=  STOPLINE,  2=  DETECTOR,  3=  EXIT 

C  PL  IS  THE  CURRENT  DECISION  POINT  NUMBER 

1003  FORMAT ( 'O' , 'MORE  SPECIAL  VEHICLES  THAN  DATA  PERMITS') 

1019  FORMAT ( ' O ' , '  ' ) 

1021  FORMAT  (/' O  T20  ,' SP  .  VEH.  '  , G5  ,  T9  6  ,  'START-TIME'  ,  G  8  ) 

1022  FORMAT  (' O  '  ,  T2 1  ,'  STOP L  ',  T4  1  J - T  FROM'  ,TB5,  'DELAY',T85 
1T15,G10,T40,  '  PRE V  .  STOPL  '  ) 

1023  FORMAT!'  ' , T 1 5 , G 1 O , T 3 7 , G 1 O , T 5 9 , G 1 O , T 7 8 , G 1 O ) 

1020  FORMAT  (' O ',' MAX  I  MUM  DATA  STORE  NUMBER  IN  SVEH  EQUALS 

1028  FORMAT! '  ',T2l,'T0TALS'(T37,G1O,T59,G1O,T7fi,G1O,T96, 

1 'END-TIME' ,G10) 

1030  FORMAT!  '  ',144,  ,T66,  ' - ',T84, 


POINT 


'  D  I  ST '  /  '  '  , 


'  ,  G4  ) 
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103  1 
1032 
1  033 


1  O  1 

102 

103 


1  04 
1  05 

1  O  6 
107 

1  08 


1  09 
1  1  O 

1  1  1 

1  1  2 

1  1  3 

2  1  3 
1  1  4 


PT  .  CODE 
PT .  NO.' 
, 4G 1 O ) 


FORMAT! 'O’ , 'INCORRECT  DEC 
FORMAT! 'O' , 'INCORRECT  DEC 
FORMAT  !' O ERROR  IN  SVEH' 

P  L  1  s  A  1 
J  1  =  A2 

AVEH  =  A3 
P  L  2  =  A  4 

J2  s  AS 
S  2  1 

I F ( A VEH . EO . S VS T ( S , 3 ) ) GO  TO  103 
S  =  S  +  1 

IF(S.GT.N)  GO  TO  102 

GO  TO  101 

WR I TE ( 6 , 1003) 

RETURN 

I F I  PL  1  .  EO  1  )  GO  TO  106 
I F |  P  L 1  .E0.3)  GO  TO  119 
STORE  s  S VST ( S  ,  7  ) 

I F ( S TORE . EO . O )  RETURN 
1 F ( (SVDL (STORE, 2 ) / 1 OOOOO ) 

WR  I TE (  6  ,  1 03  1  )  PL1  ,S 
IF( !svdl(store,2)»iooooo»pli ) 

WR I TE  (  6  ,  1 032  )  DST (  J 1  )  ,  S 
S VD L ( S TORE , 2 )  s  J2  +  100000*PL2 

S VD L ( S TORE , 4 )  =  S V D L ( S T 0 R E , 4 ) 

RETURN 

I F (  NDSN  .  L  E  .  O  )  GO  TO  111 
STORE  2  S  V  S  T ( S  ,  7  ) 

IF(STORE.EO.O)  GO  TO  110 
S VDL ( STORE , 5 )  2  NDSN 

SVST(S,7)  2  NDSN 

SVDL ( NDSN, 1 )  =  J 1  +  100000*PL 1 

S VDL ( NDSN , 2 )  =  J2  +  100000*PL2 

SVDL (NDSN, 3)  =  MSEC  +  100000*S 

T  2  2  MSEC  +  CARS  (AVEH,  1  ) 

VEL  =  -  CARS  ( AVEH , 3  ) 

SVDL (NDSN, 4)  s  T2  +  100000*VEL 

STORE  2  NDSN 

NDSN  s  S VDL ( NDSN , 5 ) 

I F ( NDSN . L E . MDST )  GO  TO  109 

MOST  2  NDSN 

SVDL  (STORE  ,  5  )  =  O 

RETURN 

S  VS  T  ( S ,  2  )  2  NDSN 

GO  TO  108 
S  2  2  1 

STORE  2  SVST ( S2 , 7 ) 

I  F ( STORE  .  EO  .  O ) GO  TO  113 
MARK  2  5 
GO  TO  114 

I F ( S2 . EO . N ) GO  TO  213 
S  2  2  S  2  +1 

GO  TO  112 

I F  ( MA  R  K 1  .  EO  .  5  ) RETURN 
GO  TO  107 

STORE  =  S VST ( S2 , 2  ) 

1 F ( STORE . EO . O )  GO  TO  113 
START  2  O 
TJTIME  =  O 
TDL  Y  2  O 


G  5  ,  ' 
G  1  O  , 


BUS  NO . 
'BUS  NO . 


EQ  .  P  L  1  ) GO  TO  104 


EO  .  J  1  )  GO  TO  105 


+  CARS ( A VEH , 1 ) 


G5  ) 

,  G  5  ) 


*  1 


■j  » r  •  .  * 


240  1 

2402 

2403 

2  404 

2405 

2406 

2407 

2408 

2409 

24  10 

24  11 

24  12 

24  13 

24  14 

24  15 

24  16 

24  1  7 

24  18 

24  19 

24  20 

242  1 

24  22 

24  23 

24  24 

24  25 

2426 

24  27 

24  28 

2429 

24  30 

243  1 

24  32 

24  33 

2434 

24  35 

2436 

24  37 

2438 

2439 

2440 

24  4  1 

24  4  2 

244  3 

2444 

244  5 

244  6 

2447 

244  8 

244  9 

24  50 

24  5  1 

2452 

24  5  3 

24  54 

2455 

2456 

2457 

24  58 

24  5  9 

24  60 

24  6  1 

24  62 

24  63 

24  64 

24  65 

24  6  6 

24  67 

24  68 

24  69 

24  70 

24  7  1 

24  72 

24  73 

2474 

2475 

24  7  6 

2477 

24  78 

2479 

24  80 

248  1 

2482 

2483 

2484 

2485 

248  6 

2487 

2488 

2489 

24  90 

249  1 

249  2 

249  3 

24  94 

2495 

24  9  6 

249  7 

2498 

2499 

2500 

250  1 

2502 

2503 

2504 

2505 

2506 

2507 

2508 

2509 

25  1  0 

25  1  1 

25  1  2 

25  1  3 

25  14 

25  15 

25  16 

25  17 

25  1  8 

25  1  9 

2520 


TD I  ST  =  O 

IF  | IPRINT.EO.O)  WRITE  (6.1019) 

APL1  s  S VDL ( STORE , 1 )/ 1 OOOOO 
A  J  1 =  S  V  D  L (STORE , 1 )• 1 OOOOO* AP L 1 
APL2  =  SVDL ( STORE , 2 )/ 1 OOOOO 
A  J  2  s  SVDL  (STORE,  2)  -  lOOOOO*  A  P  L  2 

AS  s  S VDL ( STORE , 3 )/ 1 OOOOO 
AMSEC=SVDL  (STORE.  3)  -  1 OOOOO* AS 
A  V  E l  =  SVDL  ( STORE  .  4  )/  1  OOOOO 
A  T  2  s  SVDL  (STORE  ,  4  )  -  1 OOOOO  *  A  V  E  L 

115  NEXT  =  S VD L  ( S T ORE  ,  5  ) 

I F ( NEXT . EO . O )  CO  TO  118 

B  P  L  1  s  S VDL  (  NEXT ,  1  )/ lOOOOO 

BJ1  =  SVDL  (NEXT,  1  )  -  100000*BPL1 

BPL2  s  S VDL ( NEXT . 2 )/ 1 OOOOO 

B  J  2  *  SVDL  (  NEXT  ,  2  )  *  100000*BPL2 

BS  :  SVD L ( NEXT . 3 )/ 1 OOOOO 

BMSEC  s  S VDL ( NEXT , 3 )  -  100000*BS 

BVEL  =  SVDL ( NEXT , 4 )/ lOOOOO 

B  T  2  =  SVDLINEXT.4)  -  100000*BVEL 

I  F ( SVDL  ( STORE  ,  2  ).  EO  .  SVDL  (  NEXT ,  1  )  )  GO  TO  116 

WR  I T  E (  6 ,  1033)  APL2,JST(AJ2)  ,BPL1  ,JST(BJ1  ) 

116  I  F ( START  .  EO  .  5  ) GO  TO  117 
IF  |  IPR1NT)  18,19,18 

19  WRITEI 6, 1021 )S2,flMSEC 
WR  I TE  (  6 .  1022 ) JST  ( A J 1  ) 

18  START  =  5 

117  DIST  r  LTH(BJI) 

JTIME  =  BMSEC  -  AMSEC 
SDLY  =  BMSEC  -  A  T  2 

I F (  SDLY  .  LT  O  )  S  D  L  Y  =0 
TD1ST  =  TD1ST  ♦  DIST 
TDL Y  s  TDLY  ♦  SDLY 
TJTIME  s  TJT1ME  ♦  JTIME 
IF  (IPRINT)  14,15,14 

15  WR I TE  (  6 ,  1 023  )  J S T (  B J 1  )  ,  J T I  ME  ,  S D L Y  ,  D I S T 

14  S VDL ( STORE , 5 )  =  NDSN 

NDSN  =  STORE 

SVSTIS2.2)  =  NEXT 

STORE  s  NEXT 

AP  L  1  =  BP  L  1 

A  J  1  =  B  J  1 

APL2  =  BPL2 

A  J  2  =  BJ2 

AS  =  BS 

AMSEC  s  BMSEC 

AVEL  =  B  V  E  L 

A  T  2  =  B  T  2 

GO  TO  115 

118  IF  (IPRINT)  16.17,16 
17  WRITE  ( 6 , 1030 ) 

WRITEI 6, 1028)  TJTIME, TDLY , TDIST , AMSEC 
C  SVSTINM.9)  HOLDS  THE  TOTAL  BUS  JOURNEY  TIME  FOR  BUS  JOURNEYS 
C  OF  TYPE  NM 

C  SVST(NM.IO)  HOLDS  THE  SUM  OF  SOUARES  OF  BUS  JOURNEY  TIMES 
C  FOR  BUS  JOURNEYS  TYPE  NM . 

C  SVSTINM, 1 1 )  HOLDS  THE  NUMBER  OF  BUS  JOURNEYS  OF  TYPE  NM . 

16  IF  (MSEC  -  STRT)  123,123,122 
122  NM  s  S VST ( S  ,  8  ) 

SVSTINM, 9)  =  SVSTINM, 9)  +  TJTIME 


159 


SVSTINM,  lO)  =  SVSTINM,  lO)  +  T J T  I  ME  * T J T 1  ME 
SVSTINM, 11)  =  SVSTINM, 11)  +  1 

123  I F  I  MARK  ,  EO  .  5  )  CO  TO  113 
SVST | S , 2 )  =  O 

SVST I S , 3 )  =0 

RETURN 
IIS  S  2  3  S 

MARK  SO 
GO  TO  114 
70  RETURN 

ENTRY  SPV3 
1 F I N . EO ■ O ) RETURN 
MARK  1  s  S 

WR  I TE (  6  ,  1020) MOST 
GO  TO  111 

1034  FORMAT  (  ' O  •  ,  •  VEH I  CL E  '  ,  G 1 O ,  ' AT  BUS  STOP'  ,G10,  '  IS  NOT  A  BUS') 

ENTRY  SVN0(B1,B2) 

A VEH  s  B  1 
P  L  =  B2 
S  3  1 

120  I  F | AVEH  .  EO  .  S VS T  ( S  ,  3 )  ) GO  TO  121 
S=S  +  1 

IFIS.LE.NJGO  TO  120 
WRITEI S, 1034)AVEH,DST(PL) 

RETURN 

1 2 1  BUS  s  S 
RETURN 
ENO 

SUBROUTINE  VACT 
IMPLICIT  1 NTEGER I  A  - Z  ) 

INTECER34  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGER»4  JUN.OET, ENTRY, JST, EST.OST, CARS, DTCN , NSTOP , OUTDAT , COUT , 
1MLANE , BLANE , LTH , VELO , DETINT , 

2 JNST , 

3MIN,MAX,EXTT,MINGT, MAXGT.NST.DE MO ET.EXTDET, DEM, NOST 

I NTEGER*4  S VDMDT I  28 , 4 ,  2 )  , S VEX TT I  2 8  )  , S VEX DT I  28  ,  « ,  6 )  , S VDEM | 2» ,  4 )  , 
1SVMXGT[28),SVMAX(28,4)  ,EXTRGN(28,4)  ,  EXGN I  28 , 4 ] 

R  E  A  L  *  8  TIM 

DIMENSION  JUNI7S.30)  ,  D  E  T (  120,  IS)  ,DECTR(7S)  ,  E  N  T  R  Y  ( 4  O ,  E)  , 

1 JST ( 75 )  , D  S  T  |  120)  ,EST(40)  ,CARS(7SO,4)  ,JTST(7S)  ,DTCN(75)  , 

2DLYI7S)  , NSTOP ( 75  )  ,  OUTDAT!  12,3)  ,C0UT(5,2)  , 

3SATNI3)  .COUNIS  )  ,  OCN (  3  )  , 

4TLST(28,23)  ,JNST(28)  ,CHANGE(28,2)  , 

SMLANE(6,8),BLANE(6,4),LTH(75),VEL0(75),DETINT(12O), 

GDUMJUN  (  4  )  ,  MAST JN  I  4  )  , 

7MINI28.4)  ,  MA  X  I  2  8  ,  4  )  ,EXTT(28)  ,MINGT|28)  ,MAXCT(28)  ,NST(28,4), 
8DEMDET(28,4,2),EXTDET(28,4,E)  , DEM ( 28 , 4  )  ,  N  0  S  T  (  2  8  ) 

DIMENSION  IC0MPI28)  ,  ICH0PI28)  ,NNSKIP(28)  ,  1RUNI28)  ,FST(28) 

COMMON  JUN,  DET.DECTR,  ENTRY,  JST,  DST.EST,  CARS,  MS  EC, 

1JTST, DTCN, DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2MLANE, BLANE, LTH, VELO, DETINT, BM, BUS 
COMMON /C0M1 /SATN,COUN,OCN,VLTH, 

1 ENDT , RNGE , SPEED , NVEH , UCST , LCST , RN , ODELAY 
COMMON / COM2 / T  LST  , JNST,  CHANGE,  HF ACT  ,  NOUM,  DUMJUN  ,  MAST JN , 

1MIN, MAX.EXTT.MINGT.MAXGT.NST.DEMD ET.EXTDET, DEM, NOST, NJN, EXT 
COMMON  /BLKCMP/  S V 0 MD T , S V E X T T , S V E X D T , S V MX G T , S V MA X , S V D E M , 

1  EXTRGN.EXGN.SVEXT, ICOMP, ! CHOP , NNS K I P , IRUN.FST 
COMMON  /BLKSVH/  S V S T (  1 OO ,  1  1  )  , S V 0 L  I  1 O 0 , 5  )  ,  N S P V E H , S T A R T  , 

1  S VSTRT I  1 OO )  ,  IPRINT 
PROCESS  JUNTIONS  IN  TURN 


c 


252  1 

2522 

2523 

25  24 

2525 

2  5  2  5 

2527 

2528 

2529 

2530 

253  1 

2532 

2533 

2534 

2535 

25  3  5 

2537 

2538 

2539 

25  40 

254  1 

254  2 

2543 

25  4  4 

2545 

254  6 

254  7 

2548 

2549 

2550 

255  1 

2552 

2553 

25  5  4 

2555 

255  6 

2557 

2558 

2559 

25  60 

25  6  1 

2562 

25  63 

25  64 

2565 

2566 

25  67 

2568 

2569 

2570 

257  1 

2572 

2573 

2574 

2575 

257  6 

2577 

2578 

2579 

2580 

2  5  8  1 

2582 

2583 

2584 

2585 

2586 

2587 

2588 

2589 

2590 

25  9  1 

259  2 

2593 

2594 

2595 

259  6 

2597 

25  9  8 

2599 

2  600 

2  60  1 

2602 

2  603 

2  604 

2  605 

2  606 

2607 

2  608 

2  609 

26  10 

2  6  11 

26  12 

2  6  13 

2  6  14 

26  15 

2  6  16 

2  6  17 

26  18 

2  6  19 

2  620 

2  62  1 

2  622 

2623 

2624 

2  625 

2  626 

2627 

2628 

2  629 

2  630 

2  63  1 

2  632 

2633 

2634 

2  635 

2636 

2637 

2638 

2  639 

2  640 


FIND  NO  OF  VEHICLES  WAITING 


I  ) 


23 
I  F 


I  F 


DO  20  JN  s  1  ,  N  J  N 
CHANGE  I  JN,  1  )  :0 
CHANGE  (  JN  ,  2  )  =  O 
K  s  NOST ( JN ) 

FOR  EACH  STAGE 
DO  2  ST  s  1  ,  K 
DO  1  I  =  1,2 

D  =  DEMDET (  JN ,  ST , 

IF  ( D )  1,1,23 

DD  s  DETINT(D)  -  1  OO*  | DET 1  NT (  0  ) /  1 OO ) 

DO  NOT  WANT  TO  DETECT  A  QUEUE  ADD  NEXT  STATEMENT 
IF  IDD.EO  20)  GO  TO  1 

IF  (DD.GT.O)  DEMI JN,ST):DEM| JN,ST)+DD 

CONTINUE 

CONTINUE 

RST  =  TLST(JN.l) 

IF  JUNCTION  IS  IN  INTERCREEN  OR  P R E -  1  N T E R G R E E N  NO  CHANCE 
IF|RST. LT.O)  GO  TO  20 
IFITLST1  JN,2)  .LE.O)  GO  TO  20 
DEM(  JN  ,  RST  )  =  O 

FIRST  SECOND  STAGE  RUNNING  SET  MINIUM  GREEN  TIMER 
2  )  .  NE  .  1  )  GO  TO  4 

HFACT  +  1 


MINI  JN,  RST  ) 


THIS  IS  THE 
IF  (TLSTI  JN, 

MI NGT  (  JN  ) 

NODEM  =  O 

I F ( MAXGT ( JN )  N  E  O  ) G  0  TO 
TEMP  =  O 
DO  5  ST  s  1  ,  K 
I F  (  DEMI  JN  ,  ST  ) 

CONTINUE 
I F  (  TEMP  .  EQ  O  ) 


8 


GT . O )  TEMP 


GO  TO 


TEMP  «■  1 


MAX(  JN,RST)  4-  EXTRGN  (  JN  ,  RS  T  )  4  1 


6 

IF  ( E X TRGN ( JN , RS T ) )  3,3,7 

3  MAXGT(JN)  =  MAX  (  JN  ,  RST  )  4-  1  -  HFACT 

GO  TO  8 

7  MAXGT ( JN ) 

GO  TO  £ 

6  NODEM  =  1 

£  EXTT  [ JN  )  =  EXTT (  JN )  -  1 

DO  9  I  =  1  ,  6 
D : EXTDET ( JN , RST . I ) 

I  F (  D  .  EO  .  O ) GO  TO  9 
I F  (  DET I  NT  (  D )  .  GT  .  O  )  GO  TO  11 
9  CONTINUE 

DECREMENT  MINIMUM  GREEN 

10  MINC-TI  JN)  =  MINCT(JN)  - 
IF  NO  DEMAND  THEN  NODEM 
IFINODEM.EO. 1 )  GO  TO  20 
GO  TO  13 

11  EXTT (  JN  )=  EXT 
GO  TO  10 

DECREMENT  MAXIMUM  GREEN 
13  MAXGT(JN)  s  MAXCT(JN)  - 

IF  MINIMUM  GREEN  UNEXPIRED  -NO  CHA 
IF  | MI NGT | JN ) . GT . O )  GO  TO  20 
IF  MAXIMUM  GREEN  ELAPSED  CHANGE  = 

I F  |  MAX GT  (  JN  )  .  EO  .  O  )  GO  TO  12 
IF  NO  EXTENSION  OUTSTANDING  CHANGE 
IFIEXTTI JN)  .  LE.O)  GO  TO  14 
GO  TO  20 

1 2  CHANGE (  JN  ,  2  )  =  2 

GO  TO  15 


TIMER 

1 

=  1  -NO  CHANGE 


TIMER 

1 
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1 4  CHANGE  (  JN  ,  2  )  =  1 

C  CHANGE  TO  NEXT  STAGE 

15  KK«KM 
NEWST  =  RST 

DO  16  SST= 1 , KK 
N  E WS  T  =  N  S  T (  J  N  ,  NEWST) 

IF  ( DEMI JN , NEWST ) )  16,16,17 

1 6  CONT I NUE 

17  CHANGE ( JN , 1 ) sNEWST 
IF  (IPRINT)  16,19,18 

19  WRITE!  6,  lOO I  MSEC ,  JNST  l  JN  )  ,CHANGE!JN,2)  ,  CHANGE  I  JN  ,  1  ) 
lOO  FORMAT  ('  MSEC  =',G5,'  J U N C T  I  0 N '  ,  G 3 ,  '  CHANGE',  G2, 

1  '  OCCURING  STAGE  =',G2) 

18  MI NGT ( JN ) =0 
EXTT ( JN ) = O 

20  CONTINUE 
RETURN 
END 

SUBROUTINE  0 A T A ( N 1 , N 2 , N 3 , N 4 ) 

C  N 1  s  COUN l  1  )  ,  N2=C0UN(2),  N3=C0UN!3),  N4=C0UN(5) 

IMPLICIT  lNTEGER(A-Z) 

INTEGERS  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 
REALM  SEDL  ,  SE  JT  ,  SOAV  JT  ,  SODEL 

INTECERM  JUN,  DET,  ENTRY.  JST,EST,DST,  CARS,  OTCN  , NSTOP ,  OUTDAT ,  COUT , 
1MLANE  ,  BLANE  ,  LTH  ,  VELO  ,  DET I  NT  ,  D  CARS  ,  HIST 
INTECERM  N  G  R  N (  2  8  ,  4  }  ,  NCREEN |  28 , 4  )  ,GRNT|28,4),GREENTI28,4) 
INTEGER*4  FRCCNG(28,4,4)  ,NSVEX(28,4,4)  ,  NWGP  ,  NWMX  , S  VSTRT 
REAL  CONV  ,  ENT  I  I  40 ) 

R  E  A  L  *  8  VMPH  ,  VHPH ,  F  LOW,  B  1  ,  B2 , A V JT  ,  T JT  , SUMF LO  , SUMJT , A  I N 
REALM  TIM 

DIMENSION  JUN(75,30)  ,DET(  120,  15)  .DECTRI7S)  .ENTRY140,  6)  , 

1JSTI75)  ,DST(  120)  ,EST(40)  ,CARS(750,4)  ,JTST(7S)  ,DTCN[7S)  , 

2  D  L  Y  (  7  5  )  ,  NSTOP  (  75  )  ,  OUTDAT  (  12,3)  ,C0UT(5,2)  , 

3SATNI3)  ,  COUN  (  5  )  ,  OCN  (  3  )  , 

4MLANE(6,8),BLANE(6,4)  ,LTH(7S)  ,VEL0(75)  ,DETINT(  120)  , 

5  J  T  S  (  7  5  )  ,  D  R  C  N  (  7  5  )  ,  DELAY  (  75  )  ,NSTP(75)  ,JS(7S)  ,S00EL(75)  , 

6S0AV JT ( 75 ) 

COMMON  JUN,  DET,  DECTR,  ENTRY,  JST.OST.EST,  CARS, MS  EC, 

1JTST,DTCN,DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2MLANE, BLANE, LTH, VELO, DETINT, BM, BUS 
COMMON /COM  1 /SATN,  COUN, OCN,  VLTH, 

1 ENDT  ,  RNGE  ,  SPEED  ,  NVEH ,  UCST  ,  LCST  ,  RN  , ODELAY 
COMMON  /BLKTIM/  P C H N G E I  2 8  )  , MN J N  ,  N G R N  ,  N G R E E N  ,  G R N T  ,  G R E E N T 
COMMON  /BLKSVH/  S V S T ( 1 00 , 1 1 ) , S V D L ( 1 00 , 5 ) , N S P V E H , S T A R T , 

1  S  VSTRT  I  1 00 )  ,  IPRINT 
COMMON  /BLKFCG/  F R C C N G , N S V E X , NWG P , NWMX 
COMMON  /BLKHST/  D C A R S ( 7 5 O ) , H I S T ( 7 5 , 2 O ) , HS T I N C 

COMMON  / B  L  K I  /  NSTRT ! 40 )  , SUMN !  40 )  ,  SNSC (  40  I  ,  TNSTRT |  40 |  .TSUMN140)  , 

1  TSNSO ( 40 ) , NM( 40 ) 


1000  FORMAT  (SGIO) 

1001  FORMAT (' O S TART  DATA  COLLECTION  AT  ',G6,'  INCREMENT  ',G6, 

1  '  INCREMENT  FOR  H I S T 0 G R A M ' , 1 6 ) 

1002  FORMAT!'  ' , 'NO  DATA  OUTPUT  ASKED  FOR') 

1003  FORMAT (' O ',' START  T I  ME  '  , C6 ,  T20 ,  ' S TOPL I  NE  '  ,  T35  ,  'RUNNING  TIME'  ,150, 

1  'DELAY'  ,  T  5  5  ,  'STOPS'  ,T81  ,  'FLOW'  ,T90,  'JOURNEY  TIME'  ,T108,  'AV.J-T'  ) 

1004  FORMAT!'  ' , T 2 O , G 6 , T 3 3 . G 1 O , T 4 5 , G 1 O , T 6 O , G 1 O , T 7 5 , G 1 O . T 9 O , G 1 O , 
1T105,F10.0,T120,F10.3) 

1005  FORMAT | 'O' , 'TIME',G8,T20, 'STOPLINE', T3S, 'RUNNING  TIME'.TSO. 

1  'DELAY'  ,T6S,  'STOPS  '  .  T81  ,  'FLOW'  ,T93,  'FLOW.DIST'  ,T107,  'JOURNEY  TIME' 


- 


2  S  4  1 

2642 

2  64  3 

2644 

2645 

264  6 

2  647 

2646 

2649 

2  650 

2  65  1 

2  652 

2653 

2  654 

2655 

2656 

2657 

2658 

2  65  9 

2  6  60 

2  6  6  1 

2662 

2  6  63 

2  6  64 

2665 

2666 

2  6  67 

2  6  68 

2  669 

2  670 

267  1 

2  672 

2673 

2674 

2  675 

267  6 

2  677 

2678 

2679 

2680 

2  68  1 

2682 

2  683 

2684 

2685 

2  68  6 

2  687 

2688 

2689 

2690 

2  69  1 

269  2 

2  69  3 

2  69  4 

2695 

269  6 

2  69  7 

2698 

2699 

2700 

270  1 

2702 

2703 

2704 

2705 

2706 

2707 

2708 

2709 

27  10 

27  11 

27  12 

27  13 

27  14 

27  15 

27  1  6 

27  1  7 

27  1  8 

27  19 

2720 

272  1 

2722 

2723 

2724 

2725 

272  6 

2727 

2728 

2729 

2730 

273  1 

2732 

2733 

2734 

2735 

2736 

2737 

2738 

2739 

2740 

274  1 

2742 

2743 

27  4  4 

2745 

274  6 

274  7 

274  8 

27  4  9 

2750 

275  1 

2752 

2753 

2754 

2755 

2756 

2757 

2758 

2759 

2760 


2.T124,  '  A  V  .  J  -  T  '  ) 


1  006 

FORMAT ( ' 

0  '  , 

T  2  0  , 

'DECISION' , T30 

,  '  1  NF  L  OW'  , 

T  4  0  , 

'OUTFLOW' 

) 

1  007 

FORMAT ( ' 

•  , 

T  2  0  , 

G  6  ,  2G 1 0  ) 

1  008 

FORMAT ( ' 

o  '  , 

6  X  ,  ' 

TOTAL  INFLOW', 

G10.6X, 'TOTAL 

OUTF  L  OW '  , 

G  t  0  ) 

1  009 

FORMAT ( ' 

o  '  , 

T  2  O  , 

G 1 0 , '  VEHICLES 

I  N  SYSTEM 

AT 

'  ,  G6  ) 

10  10 

FORMAT ( ' 

0  '  , 

T  2  O  , 

'VEHICLE  HOURS 

PER  HOUR 

'  . G  2 0  .  10/ 

1  '  '  ,  T  2  0 

.  '  VEH  1  CLE  K I  LOMETRES 

PER  HOUR  '  , 

G  2  0 

10) 

10  11 

FORMAT ( G 1 0 ) 

10  12 

FORMAT ( ' 

1  *  , 

T  1  0  , 

' DATA  FOR  ' , G8 

, '  SECONDS 

ENDING  AT  ' , 

G  8  /  '  0 

1  'STOPLINE'  ,  T  1 5  ,  'AVERAGE  JOURNEY'  .  T32  ,  'STANDARD'  ,  T4  5  , 

2'FREE  JOURNEY'  ,T60(  'DELAY  SECONDS  '  (T75,  'STANDARD'  ,T85, 

3  'STOPS  '  ,  T105 ,  ' F  L OW  VEHICLES',  T125,  'DISTANCE'/'  ',T15. 

4'TIME  X  1 000 '  ,  T32 ,  ' ERROR  '  ,  T 4 5  ,  ' T I  ME  X  1000',T60 
5,  'PER  HOUR '.  T75  ,' ERROR T85  ,'  PER  HOUR'  ,T105, 

6  '  PER  HOUR  ' //  ) 

1013  FORMAT  ('  '  ,  G 6 ,  T 1 3  ,  C 1 O ,  T 2 8  ,  G 1  1  .  5  ,  T 4 4  ,  G 1 O ,  T 60 ,  G 1 O ,  T 7 2  ,  G  1  1  .  5  ,  T 8 O  , 

1G10,  T  1  05 , C 1 O , T 120,  CIO) 

1014  FORMAT ( ' 1 ' , '  ' ) 

1015  FORMAT ( 1 6G5 ) 

1016  FORMAT ( 24G5 ) 

1017  FORMAT!  '  ',  'INFLOW  THIS  P E R I  0 D  '  ,  G 1 O ,  '  OUTFLOW  THIS  PERIOD'  ,G8) 

1020  FORMAT (' O ',' FAUL T  IN  DATA  OUTPUT  FOR  JUNCTION  ',G10//) 

1021  FORMAT  (' O T20 ,' TOTALS  FOR  '  ,G6,  '  SPECIFIED  LINKS'  ,T90,F10.0, 

1 T 1 05 , F 1 O . O ) 

1022  FORMAT (' O ',  T20 ,' SCALED  VALUES'  ,T90,F10.2,  '  V K P H '  ,  T 1 O 5  ,  F  1  O  .  2  , 

1 '  VHPH ' ) 

1023  FORMAT! '  ',T20,G6,T33,G10,T45,G10,T60,G10,T75,G10,T90,F10.0, 

1 T 1 05  ,  F  1 O  .  3  ) 

1  024  FORMAT  (  1 H O  ,  T 4 5  ,  ' T 0 T A L  GREEN  TIME  AND  NUMBER  OF  TIMES  GREEN') 
1025  FORMAT  ('  JUNCT I  ON  '  ,  T22 ,  ' S T AGE  '  ,  I  2  ,  T4 7 ,  ' S T AGE ',1 2  ,  T72  , 

1  ' STAGE  '  ,  I  2 ,  T97 ,  ' STAGE '  ,  I  2  ) 

1  026  FORMAT  (  I  7  ,  9 X  ,  4  (  2 (  1 5 , 5 X  )  ,  5 X  )  ) 

1027  FORMAT  ('  BUS  JOURNEY'  ,  I3.4X,  'NUMBER  OF  BUSES  '  ,  I  4  ,  4X  , 

1  'AVERAGE  JOURNEY  TIME'  ,G12  4,5X,  'STANDARD  ERROR',  G12  4) 

1028  FORMAT  ('  JUNCT I  ON '  ,  I  5  ,  3X  ,  'STAGE'  ,  I  3 ,  5 K  ,  I  5 ,  ' GAP  CHANGES' 

1,'  OVERRIDEN' , 16, '  SECONDS  IN  TOTAL', 16,'  MAX',15, 

1 '  SECONDS ' ) 

1029  FORMAT  ('  J U N C T I  0 N  '  ,  I  5 , 3 X  ,  '  N U MB E R  OF  FORCE  CHANGES  TO  ' 

1 , 'STAGE' , 13, '  FROM  STAGES  1  TO  4', 416) 

1030  FORMAT  ( 'OHISTOGRAM  D A T A ' , / 2 5 X , ' N U MB E R  Or  VEHICLES  DELAYED' 

1  ,'  FOR  LESS  THAN ',/ 'STOPL I NE ', 3X , 201 6 , /43X , 'SECONDS ' ) 

1031  FORMAT  (17, 5X , 2016) 


C  READ  0/P  START  TIME, INCREMENT  AND  NUMBER  OF  STOPLINES 
READ  (5,1000)  START  ,  I NCRM,  N  ,  HST 1 NC  ,  I  PR  I  NT 

IF  ( HST I NC . LE . O )  HST1NC  =  2 

CONV  =  3600/ I NCRM 

C  READ  STOPLINES  NUMBERS 
DO  4  J  =  1  ,  1  6 
Ms  1 6*  ( J -  1  ) ♦ 1 
L "M+ 1 5 

READ ( 5 , 1015)(JS(I),1=M,L) 

I F  (  JS  (  1 6* J )  .  EO  . O ) GO  TO  5 

4  CONTINUE 

5  WRITE!  6,  1O0  1  ) S  T  A  R  T  ,  INCRM,  HSTINC 
MARK  s  O 

C  INITIALISE  DATA  STORES 
DO  1  1  s  1 , N 1 

JTS  T (  I  )  so 
DL Y  (  I  )  s  o 
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DTCN (  I  )  so 

NS  TOP (  I  )  s  0 

JTS  (  I  )  so 

DE  L A Y  (  I  )  s  o 

DRCN ( I )  so 

NSTP  (  I  )  s  O 

SODE L ( I )  =  0.0 

S  O A  V  J  T (  I  )  S  o.o 

DO  1  II  s  1,20 

H  I  S  T  (  I  ,  I  I  )  s  O 

CONTINUE 

DO  29  I  s  1,750 

DCARS ( I )  so 

DO  6  1 s 1 , N JN 

PCHNGE ( I )  =0 

DO  6  ST:1,4 

NGRN ( I , ST )  s  O 

NGREEN ( I , ST )  =  O 

GRNT ( I , ST )  s  o 

DO  8  SS  T  s  1,4 

FRCCNG ( I , ST , SST )  s 

NS  VEX  (  I  .  ST  , SST  )  =  < 

GREENT ( I . ST )  s  o 


33 


DO  33  1=1, 

NSTRT (  I  )  : 

SUMN ( I )  = 

SNSO (  I  )  = 

TNS  TRT  (  I  ) 
TSUMN ( I )  : 

TSNSO (  I  )  s 
NM ( I )  s  O 
PT  I  N  s  O 
PTOUT  =  O 
NMPER  =  O 
NWGP  =  O 
NWMX  =  O 
CT  s  O 
RETURN 


N  3 
O 
O 
O 

=  o 
o 
o 


2  WR I TE ( 6 , 1 002 ) 


3  RETURN 


9003 


A V JT  s  o 
GO  TO  9010 


C  PERIODIC  0/P  OF  DATA  FOR  WHOLE  NETWORK 
ENTRY  D 1 


I  F (  I NCRM .  EO . 0 )  GO  TO  3 
MARK  s  O 

I F ( MSEC  -  START )  3,10,20 

CT  so 

WRITE  (6,1024) 

WRITE  (6,1025) 

DO  7  JN  s  1  ,  N JN 

WRITE  (6,1026)  JN ,( GREENT ( JN , ST  )  , NGREEN ( JN , S T  ),  S T  :  1 
DO  7  1=1,4 


(  I  .  I  *  1  ,  4  ) 


NGREEN ( JN ,  I  )  = 
GREENT ( JN .  I  )  = 


4  ) 


■ 


27  6  1 

27  62 

27  63 

27  64 

2765 

2766 

27  67 

27  68 

2769 

2770 

277  1 

2772 

2773 

2774 

2  775 

277  6 

2777 

2778 

2779 

2  7  80 

278  1 

2782 

2783 

2784 

2785 

278  6 

2787 

2788 

2789 

2790 

279  1 

2792 

27  9  3 

279  4 

2795 

279  6 

279  7 

279  8 

279  9 

2  800 

2  80  1 

2802 

2803 

2804 

2  805 

2  80  6 

2807 

2  808 

2809 

28  10 

28  11 

28  12 

28  13 

2  8  14 

28  15 

28  16 

28  17 

28  18 

28  19 

2820 

28  2  1 

2822 

2823 

2824 

2825 

2826 

2827 

2828 

2829 

2830 

283  1 

2832 

2833 

2834 

2835 

2836 

2837 

2838 

2839 

2840 

284  1 

2842 

2843 

2844 

2845 

284  6 

2847 

2848 

2849 

2850 

285  1 

2852 

2853 

2854 

2855 

285  6 

2857 

2858 

2859 

28  60 

286  1 

2862 

28  63 

28  64 

28  65 

28  66 

28  67 

2866 

2869 

2870 

287  1 

2872 

2873 

2874 

2875 

2876 

2877 

287  8 

2879 

2880 


I NFORMAT I  ON 
MSEC 


C  0/P  STOPLINE  DELAY 
WRITE  (6,1 003 ) 

DO  11  I  =  1 , N 1 

T JT  s  JTST ( I )  4  DL Y ( I ) 

I  F  (  DTCN (  I  )  .  EO  .  O ) GO  TO  9003 
AV JT  =  T  JT /DTCN  (  I  ) 

9010  WRITE! 6, 1023)  JST(I) 

JTST ( I )  sO 
DL Y ( I )  s  O 
DTCN ( I )  =  O 

NSTOP ( 1 )  s  O 
DO  11  II  s  1,10 
H  I  S  T  (  I  ,  I  I  )  s  O 
11  CONTINUE 

DO  46  I  s  1 

TSNSO ( I )  = 

TSUMN ( I )  t 
46  TNSTRT ( I )  s 


JTST (  I  )  ,  DL  Y (  I  )  ,  NSTOP  !  I  )  ,  DTCN (  I  )  ,  T  JT ,  A V  JT 


,  N  3 

-  SNSO ( I ) 

-  SUMN  (  I  ) 
-NSTRT ( I 


12  WR I TE ( 6 , 1 006 ) 

C  0/P  INFLOW  AND  OUTFLOW'  INFORMATION 
I NF  L  0  s  O 
OUTFL  =  O 
X  s  O 

DO  13  I  =  1 , N3 

WRITE!  6  ,  100  7)  EST(  1  )  ,  ENTRY  (  I  ,  6)  ,X 
INFLO  s  INFLO  ♦  ENTRY  (  1,6) 

13  CONTI NUE 

L  =  N3+  1 

U  s  N  3  +  N  4 
00  14  I  =  L , U 

WRITE! 6, 1007)  EST| I ) , X , ENTRY! I ,6) 

OUTFL  s  OUTFL  +  ENTRY (1,6) 

14  CONTINUE 

I  F (  ENTRY  (  40 , 6 )  .  EO  . O ) GO  TO  15 
WRITE!  6,  1007  )X,  X,  ENTRY!  40, 6) 

OUTFL  =  OUTFL  4  ENTRY(40,6) 

15  WR I TE ( 6 , 1 008 )  INFLO, OUTFL 
N  I  s  INFLO-PTIN 

NO  =  OUTFL  -  PTOUT 
PTOUT  s  OUTFL 
PT  I  N  s  INFLO 

103  FORMAT  ('ONUMBER  OF  PERIODS  FOR  THE  STANDARD  ERRORS', 15) 
WRITE! 6, 1017)NI , NO 
DIFFL  =  INFLO  -  OUTFL 
WR  I  TE  (  6 ,  1 009  )  DIFFL, MSEC 
C  CALCULATE  I  FOR  THE  ENTRY  POINTS 
DO  44  I s 1 , N3 
I F  ( SUMN (I))  47.47,48 

48  ENTI(I)  s  (  SNSO(  I  ) *  1  .  0*NSTRT  (  1  )  /SUMN  (  I  )  -SUMN  (  I  )  )  /  (  NSTRT (  I  )  -  1  ) 
TSNSO (  I  )  +  SNSO (  I  ) 

TSUMN  (  I  )  4  SUMN  (  I  ) 

NSTRT ( I ) 


TSNSO ( 1 ) 
TSUMN ( I ) 


47  TNSTRT!  I  )  s  TNSTRT!  I  ) 
SNSO ( I )  =  O 


SUMN ( I ) 
44  NSTRT ( I ) 


O 

=  O 


WRITE  (6.41)  (  EST (  1  )  ,  ENT  I  (  I  )  ,  I  :  1  ,N3) 

41  FORMAT  ('  I  VALUES  FOR  ENTRY  P 0  I  N T S  '  ,  5 X  ,  8  I  I  7  ,  F 5  .  2 )  ) 
I F ( MARK )  3,3.30 
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20 


2  1 


802  1 
902  1 


CT  =  CT+ 1 
IFICT.NE.  I N  C  R  M ) G  0 
CT  :  O 
CALL  GRAPH2 
CONTI NUE 


TO  3 


WRITE 
WRITE 
DO  17 
DO  18 


(  6  , 
(  6  , 
JN: 
I  =  1 


11,1:1,4) 


1024) 

1025  ) 

1  ,  N  JN 
,  4 

I  )  s  NGRN (  JN 
I )  =  GRNT ( JN 


NGRN l JN 
GRNT ( JN 

WRITE  (6,1026) 

DO  17  1=1,4 

NGREEN (  JN  ,  I  )  = 

GREENT ( JN ,  I  )  = 

WRITE  (6,1 005 ) 

SUMFLO  =  O 
S  UM JT  =  O 

DO  22  I  =  1 , N 1 

T  JT  =  JTST  (  1  )  DL  Y  (  I  ) 
DFLOW  =  DTCN (  I  ) *  L  TH (  I  ) 
I  F  (  DTCN (  I  )  . EO .  O )  GO  TO 
AV JT  =  T JT/DTCN ( I ) 

SOAV JT ( I )  =  SOAV JT ( I ) 


NGREEN ( JN , 
GREENT ( JN , 


I  ) 
I  ) 


JN,  (  GREENT (  JN  , ST )  ,  NGREEN (  JN , ST  )  ,ST=1  ,4) 

0 

0 

MSEC 


4  TJT*TJT 


22 


9022 


WRITE!  6,  1004)  JST(  I  )  ,JTST(  I  )  ,DLY(  I  )  ,  NSTOP (  I  )  , 
1DTCNI I ) ,DFLOW,TJT,AVJT 
DO  802  1  P  L  =  1  ,  N 

1 F ( JS ! PL ) . EO . JST ( I ) )  GO  TO  9022 
CONTINUE 

JTS  (  I  )  =  JTS  (  I  )  +  JTST (  I  ) 

JTST (  I  )  =0 

I F ( JTS ( I ) . GT  1 OOOOOOOOO )  MARK  =  2 

DELAY! I )  =  DELAY! I )  4  DLY(I) 

SODEL(I)  =  SODEL(I)  4  1  .  O D O * D L Y (  1  )  * D L Y (  I  ) 

DL Y (  I  )  =  O 

I  F (  DEL  AY  (  I  ).  GT  .  1 OOOOOOOOO )  MARK  =  2 

NSTP(I)  =  NSTP(I)  4  NSTOP( I ) 

NSTOP ( I )  =0 

I  F ( NSTP (  I  )  .  GT  .  lOOOOOOOOO  )  MARK  =  2 

DRCN(l)  =  DRCN(I)  4  DTCN!  1  ) 

DTCN ( I )  =  O 

I  F  (  DRCN (  I  ).  GT  .  1 OOOOOOOOO )  MARK  =  2 

CONT I NUE 

WR  I  TE  (  6  ,  1 02 1  )  N  .  SUMF L 0  .  SUMJT 

SCALE  VALUES  TO  VEHICLE  KM.  PER  HOUR  AND  VEHICLE 

SUMFLO  =  ( SUMF L 0* CON  V  )/ 1 OOO 

SUMJT  =  SUMJT/1NCRM 

WR  I  TE  (  6  ,  1 022 )  SUMFLO, SUMJT 

NMPER  =  NMPER  4  1 

CO  TO  12 

A  V  J  T  =  O 

CO  TO  7021 

SUMFLO  =  SUMFLO  4  DFLOW 
SUMJT  *  SUMJT  ♦  TJT 
CO  TO  9021 


HOURS 


ENTRY  D  2 

C  . 

I  F (  I NCRM .  EO . O )  GO  TO  3 
MARK  =  1 


PER  HOUR 


288  1 

2882 

2883 

2884 

2885 

288  6 

2887 

2888 

2889 

2890 

289  1 

2892 

289  3 

289  4 

2895 

289  6 

289  7 

28  9  8 

2899 

2900 

290  1 

2902 

2903 

2904 

2905 

2906 

2907 

2908 

2909 

29  10 

29  11 

29  12 

29  13 

29  14 

29  1  5 

29  1  6 

29  17 

29  18 

29  19 

29  20 

29  2  1 

29  22 

29  23 

29  24 

29  25 

29  2  6 

29  27 

29  28 

29  29 

29  30 

29  3  1 

29  32 

29  33 

29  34 

29  35 

29  3  6 

29  37 

29  38 

29  39 

29  40 

29  4  1 

29  42 

29  4  3 

2944 

29  4  5 

29  4  6 

2947 

2948 

29  49 

29  50 

29  5  1 

2952 

2953 

2954 

29  5  5 

2956 

2957 

29  58 

29  5  9 

29  60 

29  6  1 

29  62 

29  63 

29  64 

29  65 

29  6  6 

29  67 

29  68 

29  69 

29  70 

29  7  1 

2972 

29  73 

2974 

2975 

2976 

29  77 

29  78 

29  79 

29  80 

2  9  8  1 

29  82 

29  83 

29  84 

29  85 

29  8  6 

29  87 

29  88 

29  89 

29  90 

29  9  1 

29  9  2 

29  93 

2994 

2995 

2996 

2997 

29  9  8 

29  9  9 

3000 


c  - 


GO  TO  21 


3  1 
903  1 


.  O 
.  0 

1  ,  N 

s  1  ,  N  1 

EO.  JST(PL)  ) 


24  ) 


+  DEL  AY  (  PL  ) 

1 )  100,100,101 


1 

37 


38 


40 


25 


TIMD  =  MSEC  -  START 
WR  I TE (  6  ,  1  0  1  2 )  TIMD, MSEC 
START  s  MSEC  +  500 

MARK  6  =  O 
VMPH  s  O 
VHPH  =  O 
DO  37  I 
DO  31  PL 

1F( JS( I J  EO. JST(PL) )  GO  TO  32 
CONTINUE 

WR I TE  (  6  ,  1020 )  JS  (  I  ) 

I F  ( MARKS  .  EO  .  1)  GO  TO  37 
WRITE16,  1016)  (JST(J)  ,  J:  1 
MARKS  =  1 
GO  TO  37 
D 1ST  s  LTH (  PL  ) 

VEL.'VELOfPL  ) 

JTS (PL)  s  JTS (PL) 

I F  ( NMPER 

SE JT  s  FLOAT  (  JTS (  PL  )  ) 

SEJT  =  ISOAVJT(PL)  -  S EJT* S E JT / NMPER )/(  NMPERM  NMPER  • 

SEJT  s  SORT  ( SEJT  )*  1 OOO  .  /DRCN (  P L  ) 

SEDL  =  F L 0 AT ( DE L A Y ( P L ) ) 

SEDL  =  (SODEL(PL)  -  SEDL?SEDL/NMPER) /( NMPER* ( NMPER* 1 ) ) 

SEDL  »  SORT  (SEDL  )  *3600 . 0*NMPER/T1MD 
GO  TO  102 
SEJT  s  O 
SEDL  =  O 

B 1  *  (  JTS  (  PL  ) *3600  .  )/TIMD-(  (  (  DRCN ( P L  ) *  3 600  .  )  / T I MD ) * D I S T  ) / VE L 
DELAY  (  PL  )  s  B  1 
B  1  s  JTS  ( P  L  ) 

B  2  s  TIMD 

VHPH  =  VHPH  +  B1/B2 

JTS(PL)  =  ( JTS ( PL )  * 1 OOO ) /DRCN ( PL ) 

JT 1  =  (  D  I  S  T  *  1 OOO  )  / VE  L 

NSTP(PL)  =  (  NSTP (  P  L  ) *3600 )  /TIMD 

DRCN(PL)  =  ( DRCN ( PL )* 3600 ) /T I MD 

FLOW  s  DRCN(PL) 

B  2  s  D  I  S  T 

VMPH  =  VMPH  +  (  B2*F  LOW)  /  (  1000.0) 

WRITE  (6,1013)  JST (  PL  ),  JTS  (  PL  ), SEJT  ,  JT 1  ,  DELAY  (  PL  ),  SEDL  , 
DRCN(PL)  ,  D  I  S  T 


1  )  ) 


,103)  NMPER 
:  1  ,  N  1 

O 

s  O 
:  O 
:  O 


NSTP(PL  ) 

CONTINUE 
WRITE  ( 6 , 

DO  40  I  s 

JTS  (  I  )  £ 

DEL  AY  (  I  ) 

DRCN (  I  )  s 

NSTP  (  I  )  s 

CONTINUE 

WR I TE ( 6 , 1 O 1 O )  VHPH, VMPH 
WRITE  (6,1024) 

WRITE  (  6  ,  1025  )  (  I  ,  1  s  1  ,  4  ) 

WRITE  (6,1026)  (JN,  (GRNT(JN,ST)  ,NGRN(JN,ST)  ,ST*1  ,4)  ,  J  N  =  1  ,NJN) 

C  OUTPUT  SUMMARIES  FOR  SPECIAL  VEHICLES. 

I F  ( NSP VEH )  112,112,114 

114  WRITE  (6,1007) 

DO  110  I  *  1  ,  NSP VEH 


163 


IF  (  S  VS  T (  1  ,  1  1  )  )  111.111,110 

110  CONTINUE 
GO  TO  112 
1111  =  1-1 

DO  113  II  =  1,1 

AIN  =  F L OAT  ( S VS T (  I  I  ,  1  1  )  ) 

SEDL  =  FLOAT  1 SVST (  I  I  ,  9  )  ) 

SEJT  =  SEDL/AIN 

SEDL  =  (  FL OAT ( S VST (  1  I  ,  1 O )  )  -  S E D L * S E D L / A  I  N  )  /  ( A  I N *  ( A  I N -  1  .  O )  ) 

SEDL  =  SORT  (SEDL  ) 

WRITE  (6,1027)  I  I  , S V S T (  I  I  ,  1  1  )  , S E J T  , S E D L 
113  CONTINUE 

C  OUTPUT  DETAILS  OF  SELECTIVE  VEHICLE  OPERATION. 


DO 

9 

1  =  1 

,  NJN 

DO 

24 

J  s 

1  ,  4 

DO 

1  9 

K  £ 

1  ,  3  , 

IF  ( NS  VEX (  I  ,  J  ,  K  )  )  19,19,23 


1  9 

CONTINUE 

GO  TO  24 

23 

WRITE  (  6  , 

1028) 

I  ,  J  , 

(  NS  VEX (  I  ,  J ,  K )  ,  K  =  1 

.4) 

24 

CONTINUE 

DO  2  6  J  s  1 

4  4 

DO  27  K  =  1 

,  A 

I F  ( FRCCNG ( I , K , 

J  )  ) 

27,27,28 

27 

CONTINUE 

GO  TO  26 

28 

WRITE  (  6  , 

1029) 

I  ,  J  , 

(  FRCCNG (  I  ,  K ,  J )  ,  K  = 

1,4) 

26 

CONT I NUE 

9 

CONTINUE 

DO  200  I 

s  1,20 

200 

DEARS  (  I  ) 

=  HST I NC  * 

I 

WRITE  (6,1030)  ( D  C  A  RS  (  I  )  ,  I  =  1,20) 

DO  20  1  I  =  1  ,  N 

DO  202  PL  =  1 , N 1 

IF  ( JS ( I )  -  JST(PL))  202,203,202 

203  WRITE  (6,1031)  J S (  I  )  ,  ( H I S T ( P L ,  I  I  )  ,  I  I  =  1,20) 

202  CONTINUE 
201  CONTINUE 

DO  42  1 = 1 , N3 

42  ENTI(I)  =  (  TSNSO (  I  ) *  1  O* TNSTRT (  I  ) /TSUMN (  1  )  - TSUMN (  I  )  ) / (  TNSTRT  (  I  )  -  1  ) 

WRITE  (6,41)  (  ES T (  I  )  ,  ENT  I  (  I  )  ,  I  =  1  ,  N3  ) 

112  WRITE  (6,1014) 

RETURN 

END 

SUBROUTINE  S V R E A D ( N 0 E MD ) 

IMPLICIT  INTEGER(A-Z) 

INTEGER*4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 
I NTEGER*4  I NST (  100 )  ,  EX (  4  )  ,  MX  (  4  ) 

INTEGER**  JUN.DET,  ENTRY,  JST,  EST.DST,  CARS,  DTCN.NSTOP.OUTOAT.COUT, 

1 MLANE  ,  BLANE  ,  LTH ,  VELO  ,  DET I  NT  , 

2 JNST  . 

3MIN,MAX,EXTT,MINGT,MAXGT,NST,DEMDET.EXTDET,DEM,N0ST 

INTEGER»4  SVDMDT(26,4,2),SVEXTT(28),SVEXDT(28,4,6),SVDEM(28,4), 
1SVMXGT(28)  ,SV  MA  X(28,4)  ,EXTRGN(28,  4)  ,  E  X  G  N  (  2  8  ,  4  ) 

REAL  *  8  TIM 

DIMENSION  J  U  N ( 7  5  ,  3  0)  ,  D  E  T (  120,  IS)  ,DECTR(7S)  ,ENTRV(40,  6)  , 

1 J  S  T ( 7  5  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(7S)  , 

2  0  L  V  (  7  5  J  ,NST0P(75)  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3SATN13)  ,  C  0  U  N (  S  )  ,0CN(3)  , 

4TLST128.23)  ,  J  N  S  T ( 2  8  )  ,CHANGE(28,2)  , 


. 


300  1 

3002 

3003 

3004 

3005 

3006 

3007 

3008 

3009 

30  1  0 

30  1  1 

30  1  2 

30  1  3 

30  1  4 

30  1  5 

30  1  6 

30  1  7 

30  1  8 

30  1  9 

3020 

302  1 

3022 

3023 

3024 

3025 

302  6 

3027 

3028 

3029 

3030 

303  1 

3032 

3033 

3034 

3035 

303  6 

3037 

3038 

3039 

3040 

304  1 

304  2 

304  3 

3044 

304  5 

304  6 

304  7 

304  8 

304  9 

3050 

305  1 

3052 

3053 

305  4 

305  5 

305  6 

305  7 

3058 

305  9 

3060 

306  1 

3062 

3063 

3064 

3065 

306  6 

3067 

3068 

3069 

3070 

307  1 

3072 

3073 

3074 

3075 

3076 

3077 

3078 

3079 

3080 

308  1 

308  2 

3083 

3084 

3085 

308  6 

3087 

3088 

3089 

3090 

309  1 

3092 

309  3 

309  4 

309  5 

309  6 

3097 

309  8 

3099 

3  1  00 

3  10  1 

3  102 

3  103 

3  104 

3  105 

3  106 

3  107 

3  108 

3  109 

3  110 

3  111 

3  112 

3  113 

3  114 

3  115 

3  116 

3  117 

3  118 

3  119 

3  1  20 


5MLANE(6,8)  ,  B  L  A  N  E (  6 .  4  )  ,LTH(75)  ,  VEL  0 (  75 )  ,  D  E  T  1  N  T  (  120)  , 

6DUMJUN (  4  )  , MAS  T JN (  4  )  , 

7MI N | 28  ,  4  )  ,  M  A  X  (  2  8  ,  4  )  ,  EXTT  (  28  )  ,MINCT|28)  ,MAXCT(28)  ,  NST (  28  ,  4  )  , 
8DEMDET (28,4,2) ,EXTDET(28,4, 6) ,DEM(28,4) . NOST ( 28 ) 

DIMENSION  ICO MP  (28)  .  I  CHOP  (  28 )  . NNSK 1 P ( 28 )  ,  IRUN(28)  ,  FST (  28  ) 
COMMON  JUN, DET, DECTR, ENTRY , JS7 , DST , EST , CARS .MSEC , 

1JTST  ,  DTCN,  DLY  ,  NSTOP  ,  OUTDAT  ,  COUT  ,  NOUT  ,  NPER , 
2MLANE.BLANE,LTH,VEL0, DETINT, BM. BUS 
C0MM0N/C0M1 / S  A  T  N ,  COUN  , OCN , VLTH , 

1ENDT,  RNGE,  SPEED,  NVEH,  UCST  ,  LCST  ,  RN  ,  ODE  LAY 
COMMON / COM2 / T IS T , JNST, CHANGE , HFACT , NDUM, DUMJUN , MASTJN 
1 M I N  , MA  X  ,  EXTT  , Ml NGT  , MAXGT  ,  NST  ,  DEMDET  ,  EXTDET  ,  DEM,  NOST  ,  NJN  ,  EXT 
COMMON  /BLKCMP/  S VDMDT , S VEXTT , S VE XDT , S VMXCT , S VMAX , S VDEM ’ 

1  EXTRGN  ,  EXGN.SVEXT  ,  ICOMP,  I  CHOP  ,  NNSK I P  ,  IRUN.FST 
I  X  X  =  O 

DO  1 OO  1*1,28 
DO  102  J*1,4 

EXTRGN ( 1 , J )  s  O 
102  S  V  D E M (  I  ,  J  )  =  O 

S  VEXTT  (  I  )  s  O 
S  VMXGT (  I  )  =0 

I C  OMP (  1  )  5  0 

I  CHOP (  I  )  =0 

NNSK I P (  I  )  5  O 

I  RUN (  I  )  s  O 
1O0  CONTINUE 

DO  12  1 5 1 , NJN 

J  *  J  NS T  (  I  ) 

12  1  NST ( J )  =  I 

C  READ  IN  EXTENSION  PRODUCED  BY  S.V.  DETECTORS. 

READ  (5,30)  SVEXT , NDEMD 
WRITE  (6,31)  SVEXT  ,  N  D  E  MD 
DO  1  1 s 1 , NJN 

DO  8  J  =  1  ,  4 
EXGN ( I , J ) so 

8  S  VMAX  (  1  .  J )  s  O 

C  READ  IN  EXTERNAL  JUNCTION  NO.,  FIRST  STAGE, AND 
C  EXTRA  GREEN  AND  SV  MAX  GREEN  OF  4  STAGES. 

READ  (5.2)  JN,FS, (EX(J),J*1 ,4) . (MX(J) ,Js1 ,4) 

J JN  *  I  NS  T  (  JN  ) 

FS  T  (  J JN  )  =  FS 

DO  3  J*1  ,4 

IF  (  E  X  (  J )  )  10,10,9 

9  IF  (  E  X (  J )  -  120)  10.10,5 

10  EXGN (  J JN  ,  J )  s  EX  (  J  ) 

IF  ( MX ( J ) )  5,3.11 

11  IF  ( MX ( J )  -  240 )  3,3,5 
3  S VMAX ( J JN , J ) sMX ( J ) 

GO  TO  7 

5  WRITE  (6,13)  JN.FS, (EX( J) , J*1 ,4) , (MX( J) , J* 1 ,fl) 

I  X  X  =  1 

C  READ  IN  EXTERNAL  NOS.  OF  SV  DEMAND  AND  EXTEND  DETECTORS. 

7  READ  (5,15)  ( ( S VDMDT ( J JN , L , K ) , K : 1 , 2 ) , 1 S VEXDT ( J JN ,L , K ) , 

1  K*1,  6),  Lsl,  4) 

1  CONTINUE 

WRITE  (6,16) 

WRITE  (6,17)  (  JNST (  JN  )  ,  FST  (  JN  )  ,  (  EXGN  (  JN  ,  J  )  ,  J:  1  .  4  )  ,  ( SVMAX 

1  (  J  N  ,  J  )  ,  J  5  1  ,4)  ,  JN  *  1  ,  N JN  ) 

WRITE  (6,18) 

WRITE  (6,20) 


WRITE  (6,19)  ( JNST (  JN  ),(( S VDMDT  ( JN  ,  L  ,  K ),  K*  1  .  2  ),(  SVEXDT (  JN 

1  ,  L  ,  K )  , K =  1  ,  6  )  ,  L =  1  ,  4  )  ,  JN =  1  ,  N JN  ) 

C  CONVERT  DETECTORS  TO  INTERNAL  NOS. 

NDETR  *COUN (  2  ) 

DC  6  JN  =  1  ,  N JN 
DO  2  1  ST  s  1  ,  4 
DO  22  1=1,2 

A  *S VDMDT  (  JN  , ST  ,  I  ) 

DO  23  J  =  1  ,  NDETR 

IF  (  DST (  J )  -  A )  23,24,23 

23  CONTINUE 
GO  TO  22 

24  S  VDMDT (  JN , S  T .  I  )  =  J 
22  CONTINUE 

DO  25  1=1,6 

A  =  S VEXDT (  JN  ,  ST  .  I  ) 

DO  26  J  =  1  ,  NDETR 
IF  (DST(J)-A)  26,27,26 

26  CONTINUE 
GO  TO  25 

27  SVEXDT (  JN , ST ,  I  )  =  J 

25  CONTINUE 
21  CONTINUE 

6  CONTINUE 

IF  (IXX)  4,4,14 
4  RETURN 

14  STOP 

2  FORMAT  ( 1015) 

1 5  FORMAT  (1615) 

13  FORMAT  ('  *******  ERROR  IN  S.V.  DATA  '.1015) 

16  FORMAT  ('OJUNCTION  FIRST  STAGE  EXTRA  GREEN 

1 '  SVMAX  GREEN ' ) 

17  FORMAT  (  I  7  .  I  1 O ,  7X  ,  4  I  3 , 4X .  4  I  3  ) 

18  FORMAT  ( 'OSV  DETECTORS') 

19  FORMAT  (  (I5,8X,2(2X,2I5,  18,515)  ,/,  13X,2(2X,2I5,  18,515)  )  ) 

20  FORMAT  |  'OJUNCTION'  ,9X,  'DEMAND'  ,  14X,  'EXTEND'  ,  16X,  'DEMAND' 

1  ,  1  5X  ,  '  EXTEND '  ) 

30  FORMAT  (215) 

31  FORMAT  ('  S.V.  EXTENSION  s', 15,'  NUMBER  OF  DEMAND  ' 

1  ,  '  DETECTORS  =  '  ,  I  3  ) 

END 

SUBROUTINE  TREAD 
IMPLICIT  1  NTEGER ( A  *  2 ) 

I  NTEGER*  4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

I NTEGER*  4  JUN,  DET,  ENTRY,  JST,  EST,  DST,  CARS,  DTCN,  NSTOP,  OUTDAT,  COUT, 
1  ML  AN  E  ,  BLANE  ,  LTH ,  VELO,  DETINT, 

2 JNST , 

3STST  , ARM  , S  T  N 
RE AL  *  8  TIM 

C  *  *  *  *  SEE  BELOW  IF  DIMENSIONS  OF  TLST  OR  JNST  ARE  CHANGED 

DIMENSION  J  U  N (  7  5  ,  3  O )  ,  D  E  T (  120,  15)  ,DECTR(75)  ,  ENTRY  (  40, 6)  , 

1  JS  T (  7  5  )  ,  D  S  T  (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  . 

2  D  L  Y ( 7  5  )  ,NST0P(75)  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3SATN13)  ,  C  0  U  N (  5  )  ,0CN(3), 

4TLST(28,23)  ,JNST(28)  ,CHANCE(28.2)  , 

5  M  L  A  N  E  (  6,  8)  ,  B  L  A  N  E  (  6,4  )  ,  LTH(75)  ,VEL0(75)  ,  DET I  NT  (  120)  , 

6STST(28.4) ,ARM(4) ,DUMJUN(4) ,MASTJN(4) , 

7M 1 N (  2  8 , 4  )  , MA  X  (  2  8  ,  4  )  ,EXTT(28)  ,MINCT(28)  ,MAXGT(28)  ,NST(28,4)  . 
8DEMDET( 28 , 4 , 2 ) ,EXTDET(28,4.6) ,DEM(28,4) ,N0ST(28) 

COMMON  JUN,  DET, DECTR, ENTRY,  JST, DST, EST,  CARS, MS  EC, 


• 

*1 

3  12  1 
3  122 
3  123 
3  124 
3  125 
3  12  6 


3  154 
3  15  5 
3  15  6 
3  15  7 
3  158 
3  159 
3  1  60 
3  16  1 
3  162 
3  163 
3  164 
3  165 


1JTST  ,  DTCN  ,  DLY  ,  NSTOP  ,  0  U  T  D  A  T  ,  COUT  ,  NOUT  ,  NPER  4 
2MLANE , BLANE, LTH, VELO , DETINT , BM  , BUS 
C0MM0N/C0M1  /SATN  ,  COUN  ,  0  C  N  ,  VLTH  , 

1  ENDT  ,  RNGE  , SPEED  ,  NVEH  ,  UCST  ,  LCST  ,  RN , ODELAY 


COMMON/ C0M2/T LST , JNST, CHANGE, 
1MIN .MAX , EXTT , MI NGT , MAXCT , NST , 


HFACT. NDUM, DUMJUN , MASTJN , 
DEMDET  ,  EXTDET  ,  DEM,  NOST  ,  NJN  , 


3  127 

1  OOO 

FORMAT ( 1 3G5 ) 

3  128 

10  10 

FORMAT  ( ' 

HFACT ',15) 

3  129 

1  00  1 

FORMAT (  2  0  G  A  ) 

3  1  30 

1  002 

FORMAT ('O' 

, ' FAULT 

IN  TREAD  1  . 

STN:  '  (G5,  '  JN:  ' 

.  G5  ) 

3  13  1 

1  003 

FORMAT ( ' 0 ' 

, 'JUNCTION  SI GNAL 

DATA  '  ) 

3  132 

1  004 

FORMAT ( ' 0 ' 

,  ' *  '  ,  G3  , 

4G5  ,  T4  7  ,  ' *  ' 

,G3,4G5,T91,'*'( 

G  3  , 

4GS  ) 

3  1  33 

1  005 

FORMAT ( '  ' 

, G4 , 7G5 , 

T47,G4,7G5, 

T  9  1  ,04,705) 

3  1  34 

1  006 

FORMAT ( '  ' 

, 'FAULT 

IN  TPR I  NT  1  . 

JN:  '  ,  G5  ,  '  COUN  (  4  )  r 

'  ,  G5  ) 

3  135 

1  007 

FORMAT ( ' 0 ' 

,  ' 

3  13  6 

1  008 

FORMAT ( ' 0 ' 

, 'FAULT 

IN  TREAD2. 

JNNO  *  '  ,  G5  ,  '  PLN 

r  ' 

G5  ,  ' 

CYCL  s 

3  1  37 

1  '  COUN  1  4  ) 

=  '  , G5  ) 

3  138 

1  009 

FORMAT ( ' 0 ' 

, ' FAULT 

IN  TREAD2 

STN: ' ,G5, '  JN:' 

.  GS  ) 

3  139 

10  17 

FORMAT ( ' 0 ' 

, ' FAULT 

IN  TREAD  1  .  UNRESO L VED  STOPLINE 

NO:  '  , 

G  5  ,  ' 

3  140 

10  18 

FORMAT ( ' 0 ' 

, ' JNST ( JN )  LISTING 

FOR  JN: 1  UP  TO  JN: ' 

.  G  2  ) 

3  14  1 

10  19 

FORMAT ( '  ' 

, 2G 1 0 ) 

3  142 

1  02  1 

FORMAT ('O' 

,  '  ERROR 

IN  DUMMY  JN 

DATA  DUMJUN  r  '  f 

G  5  ) 

3  14  3 

1022 

FORMAT ( ' 0 ' 

,  'ERROR 

IN  DUMMY  JN 

DATA  MASTJN : ' , 

G  5  ) 

3  144 

C 

3  14  5 

C 

START  OF  READ  JUNCTION  SIGNAL 

DATA  ROUTINE  ( 

TREAD  1  ) 

3  14  6 

R  E  A  D (  5  ,  lOOl  IC0UNI4)  ,  T  ,  HFACT  ,  NDUM 

3  147 

I F ( NDUM . EO 

O ) GO  TO 

500 

3  14  8 

DO  50  JN: 1 

,  NDUM 

3  14  9 

READ (  5  ,  lOOl  )  DUMJUN  (JN)  ,  MAS  T  J  N (  J  N  ) 

3  1  50 

50 

CONTINUE 

3  15  1 

c 

T  =  2  FOR  JNST  LISTING  WITH  JN 

NUMBERS.  OTHERWISE 

T  =  0 

3  152 

c  *  *  *  * 

ZERO  ALL 

TLST  AND 

JNST  **  CHANGE  THE  UPPER 

LIMIT 

3  153 

C  ON 

THE  DO  LOOP  IF  DIMENSIONS  ARE 

CHANGED .  THIS 

1  S 

BECAUSE 

JN'  ,  G5  ) 


500 


1 


C  THE  UNSET  ELEMENTS  OF  TLST  MAY  BE  REFERENCED  BEFORE  THE 
C  WRITE  STATEMENTS. 

C  *  *  *  * 

DO  2  JN= 1 ,28 
DO  1  WD  =  1  ,  2  3 
TLST ( JN . WD )  r  O 
CONTINUE 
JNST (  JN  )  =  O 

CONTINUE 
P  =  COUN (  4  ) 

DO  9  JN:  1  ,  P 

READ  (  5  ,  lOOl  ) JNST!  JN)  ,  A  R  M  (  1  )  , ARM ( 2 )  f  ARM (  3  )  , ARM ( 4 )  ,STST(  JN,  1  ) 


INTERNAL  PL  TYPE  DECISION  NUMBERS 


3  16  6 

1 TLST I JN , 20 ) , STST ( JN 

,  2  ) 

,  TLST  (  , 

3  167 

2STST ( JN , 4 ) , TLST ( JN , 

23  ) 

3  168 

C 

3  169 

C 

CONVERT  EXTERNAL 

ARM  NUMBERS 

3  170 

DO  40  J:  1,4 

3  17  1 

X  5  COUN (  1  ) 

3  172 

1 F | ARM ( J ) . EO  O ) 

GO 

TO 

40 

3  173 

TEST  =  ARM ( J ) 

3  174 

DO  38  I  =  1  ,  X 

3  175 

I F ( TEST  EO.JSTI 1 

) ) 

GO 

TO  39 

3  17  6 

38  CONTINUE 

3  177 

WR  ITEI6,  1017)  TEST, 

JN 

3  178 

STOP 

3  179 

39  A  R  M (  J  )  =  I 

3  1  80 

40  CONTINUE 
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3  18  1 
3  182 
3  183 
3  184 
3  185 
3  18  6 
3  187 
3  188 
3  189 
3  190 
3  19  1 
3  19  2 
3  19  3 
3  19  4 
3  19  5 
3  19  6 
3  197 
3  198 
3  19  9 
3200 
320  1 

3202 

3203 

3204 

3205 

3206 

3207 

3208 

3209 
32  1  O 
32  1  1 
32  1  2 
32  1  3 
32  14 
32  1  5 
32  1  6 
32  1  7 
32  1  8 
32  19 
3220 

322  1 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

323  1 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 


READ  (  5  ,  lOOl  )  STA.AA1  , MA 1  , AA2 , MA2 , STB  , AB  1  , MB  1  , AB2 , MB2 , 
1STC ,  AC1  , MC 1  , AC2 , MC2  f  STD , AD  1  ,  MD  1  , AD2 , MD2 
STN  =  STA 
A  1  s  AA 1 
Ml  =  MAI 
A2  =  A A  2 
M2  =  MA2 
J  B  =  1 

GOTO  6 

3  STN  =  STB 

A  1  =  AB 1 

Ml  r  MB  1 
A2  =  A B  2 
M2  e  MB  2 
JB  s  2 

GO  TO  6 

4  STN  s  STC 

A  1  r  AC  1 
Ml  =  MCI 
A  2  =  A  C  2 

M2  s  MC  2 
JB  =  3 

GOTO  6 

5  STN  =  STD 

A  1  =  ADI 

Ml  s  MD 1 
A  2  =  A  D  2 

M2  =  MD  2 
JB  s  4 

6  I F ( STN . EO . O )  GO  TO  9 
DO  7  ST  :  1  ,  4 

I F ( STN  .  EO  •  STST ( JN , ST )  )  GO  TO  8 

7  CONTINUE 

WRITEI6, 1002)  STN, JN 
STOP 

8  Q  s  ST*4 

1  F  ( A  1  .  EO . O ) GO  TO  907 
TLST ( JN . 0 )  =  ARM! A  1  ) 

TLST! JN.0+1 )  s  Ml 

907  IF(A2.E0.0)  GO  TO  908 
TLST ( JN , 0+2 )  s  ARM ( A2 ) 

T  L  S  T  (  J  N  , 0+  3  )  s  M2 

908  GO  TO  (  3 ,  4  ,  5  )  , JB 

9  CONTINUE 


I F ( NDUM . EO . O ) GO  TO  511 
DO  5  1  1  s  1  #  NDUM 

TEST  r  DUMJUN (  I  ) 

DO  52  JN  =  1  ,  P 

I F ( TEST . EO . JNST ( JN ) } GO  TO  53 

52  CONTINUE 

WRITE!  6,  1021  ) D  UM J  U  N (  1  ) 

STOP 

53  DUMJUN (  I  )  s  JN 
TEST :MAST JN ( I ) 

DO  5  4  JN  s  1  ,  p 

I F ( TEST  . EO  JNST ( JN  )  )  GO  TO  55 

54  CONTINUE 

WRITE!  6.  1022) MASTJN (  I  ) 

STOP 


• 

324  1 

3242 

3243 

3244 

3245 

324  6 

3247 

3246 

324  9 

3250 

325  1 

325  2 

3253 

3254 

325  5 

325  6 

3257 

3258 

3259 

32  60 

32  6  1 

3262 

3263 

3264 

32  65 

326  6 

32  67 

32  66 

32  69 

3270 

327  1 

3272 

3273 

3274 

3275 

327  6 

3277 

327  8 

3279 

3280 

328  1 

3282 

3283 

3284 

3285 

328  6 

3287 

3288 

3289 

3290 

329  1 

329  2 

329  3 

329  4 

3295 

329  6 

329-7 

3298 

329  9 

3300 

330  1 

3302 

3303 

3304 

3305 

3306 

3307 

3308 

3309 

33  10 

33  1  1 

33  12 

33  1  3 

33  14 

33  1  5 

33  16 

33  1  7 

33  1  8 

33  1  9 

3320 

332  1 

3322 

3323 

3324 

3325 

3326 

3327 

3328 

3329 

3330 

333  1 

3332 

3333 

3334 

3335 

333  6 

3337 

3338 

3339 

3340 

334  1 

334  2 

334  3 

334  4 

3345 

334  6 

334  7 

334  8 

334  9 

3350 

335  1 

3352 

3353 

3354 

3355 

3356 

3357 

3358 

335  9 

3360 


55  MAST JN ( I ) :JN 
51  CONTINUE 

C  START  OF  TPRINT1  ROUTINE 

511  IF(T  NE.2)  CO  TO  910 
WR  I  T  E  (  6  ,  1018)  C  0  U  N (  4  ) 

DO  999  JN:  1  ,P 

WRITEI 6, 1019 )  JN , JNST ( JN ) 

999  CONTINUE 
910  JN  s  1 

C  THIS  INDIRECT  METHOD  OF  PRINTING  JNST(JN+1)  IS  TO  BYPASS 

C  COMPILER  TROUBLES  IN  THE  4-70  J800  SYSTEM  JAN  1970 

K  s  JN  *  2 
WRITEI6, 1003) 

WRITE  (6,1010)  HFACT 
JN  =  1 

10  K  r  JN -  2 

WR  I T  E (  6  ,  1004)JNST(JN)  ,  (TLST(JN.N)  ,  N  =  20 , 23 )  ,  JNST(K  +  3), 

1  (  T  L  S  T  (  J  N  4-  1  ,N)  ,  N  =  2  O  ,  2  3  )  ,JNST(JN+2)  ,  (TIST(JN+2.N)  ,N:20,23) 

A  1  =  T  L  S  T  (  J  N  ,  4  ) 

A2  s  TLST ( JN , 6 ) 

B  1  s  TLST  (  JN .  8  ) 

B  2  s  TLST (  JN  ,  1 O ) 

Cl  £  TLST (  JN+ 1  ,4) 

C 2  =  T  LST ( JN  + 1,6) 

D 1  s  TLST ( JN  + 1.8) 

D  2  s  TLST (  JN+ 1.10) 

El  =  TLST( JN+2,4) 

E  2  =  TLST (  JN  +  2 .  6  ) 

FI  s  TLST (  JN  +  2 , 8  ) 

F  2  s  TLST  (  JN  +  2  .10) 

WRITEI  6,  1005) JSTIA1  )  ,TLST(JN,5)  ,JST(A2)  ,TLST(  JN,7)  .JST(B1  )  , 

1  T  L  S  T (  J  N  ,  9  )  ,  JSTIB2)  ,TLST(  JN,  1  1  )  ,JST(C1  )  ,TLST(  JN+1  ,5)  ,JST(C2)  . 
2TLSTUN+1  .7)  ,  JST (  D 1  )  . TLST ( JN+ 1  ,9)  ,JST(D2)  , TLST ( JN+ 1  ,  1  1  )  ,JST(E1  )  . 
3TLSTI  JN  +  2,5)  .JST(E2)  ,  T LS T  |  JN  +  2 , 7  )  ,JST(F1  )  .TLST(JN+2,9)  ,JST(F2)  , 
4TLST1 JN  +  2,  1  1  ) 

A  1  =  T  LST (  JN ,  1  2  ) 

A  2  =  TLST  (  JN  ,  1 4  ) 

B 1  =  TLST | JN , 16) 

B  2  r  TLS  T  (  JN  ,  18) 

Cl  =  TLSTl JN+1 . 12) 

C  2  r  TLST  (  JN  +  1.14) 

D 1  =  TLSTl  JN+1.  16) 

D  2  =  TLSTl  JN+  1.18) 

El  =  TLST( JN+2 .12) 

E  2  s  TLSTl  JN  +  2 .14) 

FI  s  TLSTl  JN  +  2 .16) 

F  2  r  TLSTl  JN  +  2 .18) 

WRITE16,  1005  ) JSTlAI  )  ,TLST(JN,  13)  ,JST(A2)  ,TLST(JN,  15)  ,  JSTlBI  )  . 
1TLSTI  JN,  17)  .JST1B2)  ,TLST(  JN,  19)  ,JST(C1  )  ,TLST(  JN+1  ,  13)  ,JST(C2)  . 
2TLST1 JN+1  ,  15)  ,  JSTID1  )  ,TLST(  JN+1  ,  17)  ,JST(D2)  ,TLST( JN+1  ,  19)  , JSTIE1  )  , 
3TLSTI JN  +  2,  13)  , JST l E2  )  ,TLST|  JN  +  2,  15)  ,JST(F1  )  ,TLST|  JN  +  2,  17)  ,JST(F2)  , 
4TLST ( JN+2 .19) 

JN  s  JN  +  3 

IF(  (JN  +  2)  .LE.C0UN14)  )  GO  TO  10 
I F ( JN . GT . COUN ( 4 ) )  GO  TO  912 
I F  (  JN  .  EO .  COUN I  4  )  )  GO  TO  11 
I  F  (  COUN  (  4  )  .  EC*  .  1  JN+ 1  )  )  GO  TO  12 
WR  I TE (  6  ,  1 006 )  JN.C0UN14) 

STOP 

11  WRITEI6,  1004)  JNST (  JN )  ,  (  TLST (  JN  ,  N )  ,  N  =  20 , 23  ) 
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A  1  =  TLST ( JN  ,  4  ) 

A2  :  TLST ( JN , 6 ) 

B 1  s  TLST | JN , 8 ) 

B  2  =  TLSTl  JN,  10) 

WRITEI  6,  1005  I JSTlAI  )  ,TLST(JN,  5  )  ,JST(A2)  ,TLST(JN,7)  .JSTlBI  )  . 
1TLSTI JN, 9 | , JSTIB2) ,TLST| JN, 11 ) 

A  1  =  TLSTl  JN,  12) 

A2  =  TLST I JN , 1 4 ) 

B  1  =  TLSTl  JN,  16) 

B  2  =  TLST (  JN  ,  1 8  ) 

WRITEI  6,  1009 ) JST  I  A  1  )  ,TLST(JN,  13)  ,JST(A2)  ,  T  L  S  T  (  JN  ,  IS)  ,  JSTlBI  )  , 
1TLSTIJN, 17 ) , JST I B2 ) .TLSTlJN, 19) 

GO  TO  912 
12  K  c  JN -  2 

WRITEI  6,  100  4)  JNST(JN)  ,  (TLSTlJN,  N)  ,  N  s  20 , 23 )  .JNSTlK  +  3)  , 

1 (TLSTlJN+1 , N ) ,  N  =  20 , 23  ) 

A  1  s  TLST  1  JN ,  4  ) 

A 2  =  TLST  (  JN  ,  6  ) 

B 1  =  TLST I JN , 8  ) 

B2  :  TLSTlJN, 10) 

Cl  =  TLSTIJN+1 , 4) 

C  2  =  TLSTl J  N  + 1,6) 

D  1  =  TLSTl  JN  + 1,8) 

02  =  TLSTl JN  + 1,10) 

WRITEI6,  1009  )  JSTlAI  )  .TLSTlJN,  S)  ,JST(A2)  .TLSTlJN,  7)  .JSTlBI  )  , 
1TLSTIJN.9  )  .JSTIB2)  ,  TLSTlJN,  1  1  )  ,JST(C1  )  ,  TLSTIJN+1  ,5)  ,JST(C2)  , 
2TLST(JN+1  ,7)  ,  JSTID1  )  .TLST1JN+1  ,9)  ,JST(D2)  ,TLST(JN+1  ,  1  1  ) 

A  1  s  TLST ( JN ,  1 2 ) 

A 2  =  TLST  (  JN ,  1 4  ) 

B  1  =  TLSTlJN,  16) 

B  2  :  TLST ( JN .  1 8 ) 

Cl  =  TLSTl JN+1, 12) 

C2  =  TLSTl  J  N  + 1,14) 

01  :  TLSTl JN+ 1,16) 

D  2  =  TLSTl JN+ 1,18) 

WRITEI  6,  1 005  ) JST I  A  1  )  .TLSTlJN,  13)  ,JST(A2)  .TLSTlJN,  IS)  , JSTlBI  )  , 
1TLSTIJN,  17)  , JS  T ( B  2 )  , TLSTlJN,  19  )  ,JST( Cl  )  ,TLST| JN+1  ,  13)  ,JSTIC2)  , 
2TLSTIJN+1  ,  15)  , J  S  T I  D  1  )  , TLSTIJN+1  ,  17)  ,JST(D2)  , TLSTIJN+1  ,  19) 

912  RETURN 
END 

SUBROUTINE  VAREAD 
IMPLICIT  INTEGERIA-2) 

INTEGER+4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

1NTEGER+4  JUN.DET,  ENTRY,  JST,  EST.DST,  CARS,  OTCN  .  NSTOP  , OUTDAT , COUT , 
1MLANE  ,  B  LANE  ,  LTH  ,  VELO  ,  DET I  NT  , 

2 JNS  T , 

3MI N , MAX , EXTT , MI NGT , MAXGT , NST , DEMDET , EXTDET , DEM, NOST , A 
RE AL  *  8  TIM 

DIMENSION  J  U  N I  7  5  ,  3  O )  ,DET(  120,  IS)  ,DECTR(7S)  ,  E  N  T  R  Y I  4  O  ,  6)  , 
1JST(75),OST(120) , EST | 40 ) ,CARS(7SO,4),JTST(75),DTCN(75), 

2DLYI7S)  , N  S  T  0  P  | 7  5  )  ,  OUTDAT!  12,3)  ,C0UT(S,2)  , 

3SATNI3) .COUNIS) ,0CNI3) , 

4TLST(26,23),JNST(2B) , CHANGE (28,2), 

SMLANEI6.8)  ,  BLANE I  6 , 4  ]  ,LTH(7S  )  ,VEL0|75)  .DETINTl  120)  , 

60UMJUN (4)  ,  MAS  T  J  N  I  4  )  , 

7M1NI28,  4  )  , MAX  I  28 , 4  )  , EXTT (  28)  , Ml  NGT (  28)  , MA  K  G  T  ( 2  8  )  ,NST(28,  4)  , 
8DEMDET(28,4,2),EXTDET(28,4,6),DEM(28,4),N0ST(28),A( 13) 

COMMON  JUN, DET. DECTR, ENTRY, JST, DST, EST, CARS, MS EC, 

1JTST,DTCN,DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2 ML ANE, BLANE, LTH, VELO, DETINT, BM, BUS 


336  1 

3362 

3363 

3  3  6  4 

3365 

3366 

3367 

33  68 

3  3  6  S 

3370 

337  1 

3372 

3373 

3374 

3375 

337  6 

3377 

3378 

3379 

3380 

338  1 

3382 

3383 

3384 

3385 

338  6 

3387 

3388 

3389 

3390 

339  1 

339  2 

339  3 

339  4 

339  5 

339  6 

339  7 

339  8 

339  9 

3  400 

340  1 

3402 

3403 

3404 

3405 

340  6 

3407 

3408 

3409 

34  10 

34  11 

34  12 

34  13 

34  14 

34  15 

34  16 

34  17 

34  1  8 

34  1  9 

34  20 

342  1 

3422 

3423 

3424 

34  25 

3426 

3427 

3428 

3429 

3430 

34  3  1 

3432 

34  33 

3434 

3435 

343  6 

34  37 

3438 

34  39 

3440 

344  1 

344  2 

344  3 

3444 

344  5 

34  4  6 

3447 

344  8 

344  9 

3450 

34  5  1 

3452 

3453 

3454 

3455 

345  6 

3457 

34  58 

3459 

34  60 

34  6  1 

34  62 

34  63 

34  64 

34  65 

34  6  6 

34  67 

34  68 

34  69 

34  70 

347  1 

3472 

3473 

3474 

34  75 

3476 

3477 

3478 

3479 

3480 


C0MM0N/C0M1 /SfiTN  ,  C  0  U  N  , OCN  ,  VLTH , 

1 ENDT , RNCE , SPEED , N  V  E  H , UCST ,  LCST , R  N , ODELAY 
COMMON /C0M2/TL ST  ,  JNST  ,  CHANGE  ,  HFACT  ,  NDUM ,  DUMJUN , MAS  T  J  N  , 

1  MI N ,  MAX  ,  E  X  T  T  , MI NCT  ,  MAXGT  ,  NST  ,  DEMDET  ,  EXTDET  ,  DEM,  NOST ,  NJN  ,  EXT 
READ ( 5 , lOOO ) NJN , EXT 
WRITE  (6,1 200 )  EXT 
1200  FORMAT  ('  V.A.  EXTENSION  , 15) 

DO  33  T  =  1  ,  NJN 

READ ( 5 , lOOO)  J , ( A ( I ) , I = 1 , 1 3 ) 

DO  30  JN  s  1 , NJN 
I F  ( J  .  EO  .  JNST  (  JN  )  )  CO  TO  31 
30  CONTINUE 

WR  I TE (  6  ,  1 OO )  J 
3  1  NOS  T  (  JN  )  =  A|1) 

DO  32  ST  =  1,4 

NST (JN,ST)*A(ST+1 ) 

MI  N(  JN  ,  ST  )  :A(ST  +  5  ) 

MAXI JN(ST):A(ST+9) 

32  CONTINUE 

READ (  5  ,  1 OOO  MDEMDETIJN,  1,1),  1:1,2)  .  ( EXTDET (  JN ,  1  #  I  )  ,  1  *  1  ,6), 

1  (  D  EMD  E  T ( J  N ,  2  ,  I  )  ,  Is  1  ,2)  ,  (EXTDET(JN,2,  I  )  .  I  =  1  ,  6) 

READ ( 5 , 1000 ) ( DEMDET ( JN , 3 , I ) , I s 1 , 2 ) , ( EXTDET ( JN , 3 , I ) , I s 1 , 6 ) , 

1 ( DEMDET | JN , 4 , I ) , 1=1 ,2), (EXTDET(JN,4, I) , 1=1 ,6) 

33  CONTINUE 

1 OOO  FORMAT ( 1 6G5 ) 

100  FORMAT!'  ' , 'ERROR  IN  DATA  JUNCTION  NUMBER', C5) 

D  0  9  3  4  JN  =  1  ,  NJN 

P  =  NOST ( JN ) 

WRITE)  6  ,  101  )  JNS T (  JN  )  ,  NOS T (  JN  ) 

DO  934  ST  :  1  ,  P 

WRITE!  6,  102)  MIN(JN.ST)  , MAX  (  JN , S  T  )  ,  !  DEMDET |  JN , ST  ,  I  )  ,  1  =  1  ,2)  , 
1  (  EXTDET  ( JN , ST ,  I  )  ,  1  =  1  ,6) 

934  CONTINUE 

101  FORMAT!'  C 1 O G 1 O ) 

102  FORMAT!'  ' , 2 G 5 , 1 O X , 2 G 5 , 1 O X , 6 G 5 ) 

D  =  COUN (  2  ) 

103  FORMAT!'  ',  'ERROR  IN  VAREAD  DATA  JUN  =  '  ,  G 5  ,  ' D E T  '  ,  G 5  ) 

DO  40  JN  =  1 , N JN 

P  =  NOS  T (  JN  ) 

DO  40  ST  =  1  ,  P 

DO  36  I  =  1,2 

DE  =  DEMDE  T ( JN  , S  T  ,  I  ) 

I F ( DE  .  EO  .  O  )  GO  TO  36 

DO  34  PL  =  1  ,  D 

1FIDE  .EC.DSTIPL)  )G0  TO  35 

34  CONTINUE 

WRITE!  6,  103 ) JNST ( JN )  ,DE 

35  DEMDET ( JN . S T , I )  =  PL 

36  CONTINUE 

DO  39  I  =  1,6 

DE=EXTDET ( JN , ST , 1 ) 

I F  (  DE  EO  .  O  )  GO  TO  39 

DO  37  PL  =  1  .  D 

I F (  DE  .  EO  .  DS T (  P L  )  ) GO  TO  38 

37  CONTINUE 

WRITE!  6,  1  03  )  JNST  l JN  )  ,DE 

38  EXTDET ( JN . ST , 1 )  =  PL 

39  CONTINUE 

40  CONTINUE 

NN JN  =  COUN ( 4 ) 


DO 

45 

JN  =  1  ,  NN JN 

DO 

44 

STX  =  1  ,  4 

DO 

43 

151,3,2 

0  = 

( STX  *  «  -  1  ) + I 

ARM: T  LST  (  JN ,  0 ) 

I F ( ARM .  EO  . O  )  GO  TO  43 
LN  =  TLST ( JN.0+1  ) 

IF!  ILN.EO.  1)  .OR.  (LN.E0.3)  OR.  (LN.E0.5)  . 

10R.  (LN.EQ.7)  )  GO  TO  46 

41  IF(  |  LN.E0.2)  OR.  (LN.E0.3)  OR.  (LN.E0.6)  . 

10R.  |  LN  .  EO  .  7  )  )  GO  TO  47 

42  IF!  (LN.GE.4)  . AND  .  ( LN  .  LE  .  7 )  ) GO  TO  48 

43  CONTINUE 

44  CONTINUE 

T  LST  (  JN .  1  )  =  -  1 
TLST (  JN  ,  2  )  =0 
TLST (  JN  ,  3  )  =  -999 

45  CONTINUE 

DO  50  JN  =  1  ,  N JN 
MAXGT ( JN  )  =  O 
MI NGT ( JN  )  =  O 
EXTT! JN)  =0 
DO  49  STsl.4 
DEM (  JN , S  T )  =  O 

49  CONTINUE 

50  CONTINUE 
RETURN 

46  I F ( JUN ( ARM , 1 2 ) . L T . O ) GO  TO  41 
JUN ( ARM,  12)  ! *  JUN ( ARM ,  12) 

GO  TO  41 

47  I F ( JUN ( ARM , 1 3 ) . L T . O ) CO  TO  42 
JUNIARM, 13): -JUN ( ARM, 13) 

GO  TO  42 

48  I F ( JUN ( ARM , 1 4 ) . LT . O ) GO  TO  43 
JUN ( ARM , 1 4 ) = - JUN ( ARM , 1 4 ) 

GO  TO  43 
END 

SUBROUTINE  ENDJOB 
IMPLICIT  I  NTEGER ( A  - Y  ) 

INTEGERS  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS,  TTIM 

I NTEGER*  A  JUN,  DET,  ENTRY  ,  JST,EST,DST,  CARS  ,DTCN,NSTOP,  OUTDAT  .  COUT, 
1MLANE  ,  BLANE  ,  LTH  ,  VELO  ,  DET I  NT 
REAL  .*8  TIM 

DIMENSION  J  U  N  (  7  5  ,  3  O )  ,  D  E  T  (  120,  15)  ,DECTR(75)  ,ENTRY(40,6)  , 

1 J  S  T (  7  5 )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,  JTST(75)  ,DTCN(75)  . 

2  D  L  Y  (  7  5  )  ,  N  S  T  0  P  (  7  5  )  ,  OUTDAT (  12,3)  ,C0UT(5.2)  , 

3  S  A  T  N ( 3  )  ,  C  0  U  N ( 5 )  ,0CN(3)  , 

4MLANE(6,S)  ,BLANE(6.4)  ,LTH(75)  ,VEL0{75)  ,  DETINT!  120) 

COMMON  JUN, DET, DECTR, ENTRY, JST,DST.EST, CARS, MS EC, 

1  JTST,DTCN,DLY,NSTOP,  OUTDAT,  COUT,  NOUT,  NPER. 

2MLANE  ,  BLANE ,  LTH ,  VELO  ,  DET  INT ,  BM,  BUS 
COMMON/ COM  1  /SATN,  COUN. OCN,  VLTH, 
lENDT.RNGE. SPEED, NVEH. UCST, LCST, RN, ODELAY 

1 000  FORMAT ('O','  ' ) 

1001  FORMAT (' O ',' PROGRAM  PREMATURELY  TERMINATED  BY  TYPEWRITER  AT  ',G8, 

1'  END  TIME  SHOULD  HAVE  BEEN  ',C8) 

1002  FORMAT! 'O' , 'MAXIMUM  NUMBER  OF  VEHICLES  USED  SO  FAR  IS  ',G8) 

1003  FORMAT (' O ',' CCAE3  END  DATA') 

1004  FORMAT! 'O' , 'REMAINING  SPECIAL  VEHICLE  DATA') 

1005  FORMAT (' 0 ',' OTHER  MISCELANEOUS  DATA') 


. 

■ 

34  8  1 

3462 

3463 

34  64 

34  85 

34  8  6 

3487 

34  88 

3489 

34  90 

34  9  1 

34  9  2 

34  9  3 

34  9  4 

3495 

34  9  6 

34  9  7 

3496 

34  9  9 

3500 

350  1 

3502 

3503 

3504 

3  5  05 

3506 

3507 

3508 

3509 

35  10 

35  11 

35  12 

35  1  3 

35  14 

35  15 

35  1  6 

35  17 

35  18 

35  19 

3520 

352  1 

3522 

3523 

35  24 

3525 

3  5  2  6 

3527 

3528 

35  29 

35  30 

353  1 

3532 

35  33 

35  34 

35  35 

3536 

35  37 

3536 

35  39 

3540 

354  1 

3542 

3543 

3544 

354  5 

354  6 

3547 

3548 

3549 

3550 

355  1 

3552 

3553 

3554 

35  55 

3556 

3557 

3558 

35  59 

35  60 

35  6  1 

35  62 

35  63 

35  64 

35  65 

35  6  6 

35  67 

35  68 

3569 

3570 

357  1 

3572 

3573 

3574 

3575 

357  6 

3577 

3578 

3579 

3580 

356  1 

3582 

3583 

3584 

3585 

3586 

3587 

3588 

3589 

3590 

359  1 

3592 

3593 

3594 

3595 

359  6 

3597 

3598 

3599 

3600 


1006  F ORMAT ( ' O ' , T 1 O , ' END  OF  DATA  OUTPUT'/'  ' ,T10  ' . 

1  -  -  -  '  ) 

1 007  FORMAT (  '  '  .CIO.  1  ) 

1008  FORMAT (' O NO  MORE  CARS  AVAILABLE  FOR  INPUT  END-TIME  :',C8) 
WRITE! B, 1 OOO ) 

C  CALL  COMENT ( ' ROS I M9 ' ) 

GO  TO  1 
ENTRY  ENDP 
WR I TE ( 6 , 1 008 )  MSEC 
C  CALL  COMENT (' ROS 1 M8 ' ] 

GO  TO  2 

1  WRITEI 6, 1001 )  MSEC , ENDT 
WR1TEI6, 1 002 )  LCST 
C  2  CAL  L  CLOCK (  TIM) 

C  WRITEI 6, 1007)  TIM 

2  WRITEI6, 1 OOO ) 

WR  I TE  (  6  ,  1 004  ) 

CALL  S  P  V  3 
WRITEI S, 1005) 

CALL  D  2 
WRITEI  6,  1 006  ) 

CALL  EXIT 

STOP 

END 

SUBROUTINE  GRAPHS ( N ) 

C  N  =  N  UMB  E  R  OF  STOPLINES 

IMPLICIT  INTEGER ( A*  2  ) 

1NTEGERM  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 
REAL  BLANK, ONE, SYMBOL, LINE.ACCDEL 
INTEGERS  JUN.DET,  ENTRY,  JST,EST,DST,  CARS.  DTCN 
DIMENSION  J  U  N ( 7  5 , 3  O )  ,  D  E  T (  120,  15)  ,DECTR(75)  ,  E  N  T  R  Y  ( 4  O ,  6)  , 
1JSTI75)  ,  D  S  T  (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 
2DLYI75)  ,  P  0  S  (  5  )  ,DAT(5)  , S  C  A  L  E (  5  )  ,GRAPH(5,75)  ,DL(7S)  ,LINE(  125)  , 
3ACC I  5  )  , ACCDE  L  (  5  ) 

COMMON  JUN.DET,  DECTR,  ENTRY,  JST.DST.EST,  CARS, MS  EC, 

1JTST, DTCN, DLY.NSTOP.OUTDAT.COUT, NOUT, NPER, 

2MLANE, BLANE, LTH, VELO, DETINT ,BM,BUS 
READI5  ,  1002)  STT.EDT,  INCR 
IFISTT.EO  O)G0  TO  59 
GRAPES: 1 

READI5,  100  2)  |GRAPH(X,  1  )  ,XM  ,5) 

DO  55  X  =  1,5 

ACC (  X  )  =  O 
ACCDE  L  (  X  )  sO 

IF  (  GRAPH (  X  ,  1  )  .  EO  . O  )  GO  TO  55 
IF  |  GRAPH |  X ,  1  )  .  EO  .  9999  )  GO  TO  55 
IF  |  GRAPH (  X ,  1  ).  GT  .  O )  GO  TO  56 
NUM  s  -  GRAPH (  X  ,  1  ) 

MARK  s  N  UM+ 1 
K  s  2 

50  L*K+15 

I F ( L . CE . NUM+ 1 ) GO  TO  51 

READ ( 5 , 1003)  ( G R A P H ( X , M ) , M s K , L ) 

K  =  L  ♦  1 

GO  TO  50 

56  DO  57  SL  =1,N 

I F  (  GRAPH  I  X  .  1  )  .  EO  .  JS T  |  S L  )  )  GO  TO  58 

57  CONTINUE 

WRITEI 6. 1 005 ) GRAPH ( X , 1 ) 

58  GRAPH (  X  ,  1  )  =  S  L 


GO  TO  55 

51  READ ( 5 , 1003)  | GRAPH | X , M) , M: K , MARK ) 

DO  54  M  =  2  , MA  R  K 

TEST  s  GRAPH (  X  ,  M  ) 

1  F |  TEST  .  EO  . O ) GO  TO  54 
DO  52  S  L  s  1  ,  N 

I F ( TEST . EO . JST ( SL ) )  GO  TO  53 

52  CONTINUE 

WRITEI6, 1005 ) GRAPH | X,M) 

1005  FORMAT! 'O' , 'ERROR  IN  GRAPH  INPUT  STOPLINE  NUMBER', G5) 

53  GRAPH ( X , M)  s  SL 

54  CONTINUE 

55  CONTINUE 

READ | S  ,  1003)  l  POS  (  I  )  , D AT (  1  )  , SCALE!  1  )  ,  1  =  1  ,5) 

READ! 5, 1O0)  BLANK , ONE , SYMBOL 
1 00  FORMAT (  3 A  1  ) 

GOTO  1 
59  GRAPESsO 
1  RETURN 


ENTRY  GRAPH  1 
I F | GRAPES . EO . O ) GO  TO  1 
I F ( MS  EC-STT)  1  ,  2,5 

2  WR I TE ( 6 , 1 004 ) MS E C 

1004  FORMAT! ' T , 'GRAPHICAL  OUTPUT  STARTED  MSEC  =  ',G6) 

DO  902  IM.5 

I  F (  G R A P  H (  I  ,  1  )  ) 903 , 902 , 905 
905  I  F (  GRAPH (  I  ,  1  )  .  EO  9999  ) GO  TO  904 
J  s  GRAPH (1,1) 

WRITE!  6,  1007)1  ,  JS  T ( J )  ,POS(  I  )  ,  DAT  (  I  )  .SCALE!  I  ) 

1007  FORMAT!'  ' , ' G R A P H ' , G 1 , '  STOPLINE  N0.',G4,'  POSITION  :',G4, 
1'  DATUM  :  '  ,  G  5  ,  '  SCALE  :  '  ,G5) 

GO  TO  902 

904  WRITEI 6 , 1008 ) I , POS ( I ) , DAT ( I ) .SCALE! I ) 

1008  FORMAT!'  '  ,  ' G R A P H '  ,  G 1  ,  '  ALL  STOPLINES  POSITION  :  '  ,G4, 

1'  DATUM  s  '  ,  G  5  ,  '  SCALE  :',G5) 

GO  TO  902 

903  NUMs  -  GRAPH (  I  .  1  ) 

WRITEI6, 1009)1 , NUM, POS ( I ) , DAT | I ) , SCALE ( I ) 

1009  FORMAT!'  ' , ' G R A P H ' , G 1 , G 5 , '  STOPLINES  POSITION  *',G4, 

1'  DATUM  :  '  , G  5  ,  '  SCALE  =',G5) 

902  CONTINUE 
PR  =  STT 

3  PR  s  PR  ♦  INCR 
DO  4  I  =  1  ,  N 

DL  (  I  )  *  DL Y  (  I  ) 

4  CONTINUE 
GO  TO  1 

5  1 F ( MS  EC.NE.PR)CO  TO  1 
DO  6  I  s  1  ,  N 

TEMP  : D  L  Y (  I  )  -  D  L  (  I  ) 

DL ( I )  s  TEMP 

6  CONTINUE 

DO  11  I  =  1,5 

TEMP  *  GRAPH (1,1) 

I F ( TEMP ) 8 , 1 1 , 7 

7  I  F ( TEMP  .  EO  .  9999  )  CO  TO  10 
ACC ( I )  s  DL ( TEMP ) 

CO  TO  11 

8  NUM*  -  GRAPH (1,1) 


. 


. 


3  60  1  • 

MARK  =  NUM  +  1 

3  602 

DO  9  J  =  2  , MA  R  K 

3  603 

TEMP  s  GRAPH {  I  ,  J  ) 

3  604 

ACC  I  I  )  =  ACC  I  I  )  ♦  DL  I  TEMP  ) 

3  605 

9 

CONTI NUE 

3606 

GO  TO  11 

3607 

1  0 

DO  9  10  J  s  1  ,  N 

3608 

ACC  (  I  )  =  ACC  (  1  )  +  DL  1  J  ) 

3609 

9  1  0 

CONTINUE 

3  6  10 

1  1 

CONT I NUE 

3  6  11 

DO  12  I  s  1 , 5 

36  12 

ACCDELl  I  )  =  A  C  C  D  E  L  (  1  )  ♦ ACC  I  I  ) 

3  6  13 

I F  1  ACC (  I  )  EO  .  0 ) GO  TO  12 

3  6  14 

ACC(I)=ACC(I)-(DAT(I)*INCR) 

3  6  15 

TEMP  =  S  C  A  L  E I  I  )*INCR 

3  6  16 

ACCI I 1 = lACCl I )» 10) /TEMP 

36  17 

TEMP  =  ACCI 1 )  -  (ACCII1/10)* 

1  0 

36  18 

ACCI  I  1  =  ACC  I  I  ) / 1 0 

3  6  19 

I F I  TEMP  GE  .  5  ) ACC  I  I  )  =  ACCI  I  ) 

♦  1 

3  620 

1FIACCI  I  )  .  LT  O  | ACC  1  I  )  =  0 

3  62  1 

1  2 

CONTINUE 

3622 

DO  13  I  =1,5 

3  623 

I F  I  POS  I  I  )  .  EO  .  0 ) GO  TO  13 

3  624 

TEMP  r  POS 1 I ) 

3  625 

LINEITEMP)  =  ONE 

3626 

I F  I  ACC  I  I  )  .  EO  . 0 ) GO  TO  13 

3  627 

TEMP  1  =  POS  I  I  )  +  ACC  1  I  ) 

3628 

MARK  s  TEMP+ 1 

3  629 

DO  9  12  J  s MARK ,  TEMP  1 

3630 

L INE I J )  =  SYMBOL 

363  1 

9  1  2 

CONTINUE 

3  632 

1  3 

CONTINUE 

3  633 

WR I TE 1 6 , 1 OOO )  MSEC, LINE 

3  634 

1  OOO 

FORMAT  (  '  '  ,  G7  ,  1 25A 1  ) 

3  635 

DO  14  I  si , 125 

3  63  6 

LINE(1)=BLANK 

3  637 

1  4 

CONTINUE 

3  638 

DO  15  I  =1,5 

3639 

ACC  1  I  )  =  0 

3640 

1  5 

CONTINUE 

3  64  1 

IFIPR.LT, EDTJGO  TO  3 

3  642 

TEMP  sMSEC-STT 

3  64  3 

DO  16  1=1,5 

3  64  4 

ACCDELl I ) =ACCDELI I l/TEMP 

3  645 

1  6 

CONTI NUE 

3  64  6 

WRITEI6,  1006)  (ACCDELl  I  )  ,  I  =1  , 

s ) 

3  64  7 

1  006 

FORMAT!'  ', 'AVERAGE  DELAY  IN 

VEHS  PER  SEC  IS' 

,  SF  1  0  2  ) 

3648 

GRAPES  =0 

364  9 

GOTO  1 

3  650 

1  002 

FORMAT ( 5G 1 0 ) 

365  1 

1  003 

FORMAT  I  1  6G5  ) 

3  652 

C - 

3  653 

ENTRY  GRAPH2 

3654 

I F !  GRAPES  .  EO  .  0  )  GO  TO  1 

3655 

DO  60  I  =  1  ,  N 

365  6 

TEMP  =  DLYlI)-DL(I) 

3657 

DL  I  I  )  =  -  TEMP 

3658 

60 

CONTI NUE 

3659 

GO  TO  1 

3  6  60 

C - - 

169 


3  6  6  1 
3  6  62 
3663 
3  6  64 
3  6  65 
3  6  6  6 
3  6  67 
3  6  68 
3  6  69 
3  670 
3  67  1 
3  672 
3  673 
3  674 

3675 

3676 

3677 

3678 

3679 
3  680 

368  1 
3682 
3  683 
3  684 
3685 
3  68  6 

3687 

3688 
3  689 
3690 

369  1 
3  69  2 
3  69  3 

3694 

3695 

369  6 
3  69  7 
3698 
3  69  9 
3700 

370  1 

3702 

3703 

3704 

3705 

3706 

3707 

3708 

3709 
37  1  O 
37  1  1 
37  1  2 
37  13 
37  14 
37  1  5 
37  1  6 
37  1  7 
37  1  8 
37  1  9 
3720 


END 

SUBROUTINE  0 U T 1  A  1  , A 2 . A 3  ) 

IMPLICIT  INTEGER  ( A  -  Z ) 

INTEGERS  MSEC,  JTST,  NOUT,  NPER  ,  BM,  BUS 

I NTEGER*4  JUN , DET , ENTRY , JST , EST , DST , CARS , DTCN , NSTOP , OUTDAT , COUT , 
1MLANE,  BLANE ,  LTH,  VELO,  DETINT 
REAL  *8  T IM 

DIMENSION  J  U  N (  7  5  ,  3  O )  ,  DET (  120.  15)  ,DECTR(75)  ,  ENTRY [ 40 , 6)  , 

1  J  S  T (  7  5  )  ,DST(  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 

2  D  L  Y (  7  5  )  ,  NSTOP  (  75  )  ,OUTDAT(  12,3)  ,C0UT(5,2), 

3SATNI3)  ,  C  0  U  N  (  5  )  ,0CN(3)  , 

4ML ANE  I  6,  8  )  ,  B  L ANE  t  6,  4)  ,  L  TH (  75  )  ,  VE  L  0  I  75  )  ,  DET  I  NT (  120) 

COMMON  JUN,  DET,  DECTR  ENTRY,  JST,  DST,  EST.  CARS, MS  EC, 

1 JTST , DTCN , DLY , NSTOP , OUTDAT , COUT , NOUT , NPER , 

2MLANE, BLANE, LTH, VELO, DETINT, BM.BUS 
COMMON /C0M1  / S  A  T  N ,  COUN.OCN,  VLTH, 

1ENDT  ,  RNGE  .SPEED  ,  NVEH,  UCST  ,  LCST  ,  RN  , ODELAY 


OUT|  CARS 


DECISION  POINT  NUMBERS  MUST  BE 


1  OOO 
1  OO  1 
1  002 


FORMAT ( 
FORMAT ( 
FORMAT ( 

1007  FORMAT! 

1008  FORMAT! 

1  =  A  1 

I  =  1 

J  = 

J 

K  = 


DECISION  TYPE,  DECISION  NUMBER) 


'STOPL'  ,  3  G  5  ,  1 2  G  4  , 


IN  INTERNAL 
*  *  '  ) 


PL  FORM 


A  2 
:  1 
A3 


'DETR  '  ,  3G5 , 2C8  ,  G 1 2 ,  T72 ,  ' ** 
T  7  6 , 5  G  5  ) 

'DUMP  OF  UNUSED  CAR  STORE') 


FOR  PRINT  OF  VEHICLE  LIST  FOR  THIS  DECISION  POINT, 
FOR  STOPLINE  DECISION  POINT  J  =  2  FOR  DETECTOR 


OR  1=0 


I F  (  I  .  E  O  .  2 )  GO  TO  10 
IFIJ-2)  3,5,1 
1  RETURN 

3  WR  I  TE (  6  ,  1 OOO )  JST  (  K )  ,  JUN ( K ,  1  )  ,  JUN  (  K ,  2  )  ,  ( JUN (  K ,  N )  ,  N  =  9  ,  1 4  )  , 

1  (JUNIK.N)  ,  N  =  2  3 ,  2  8 ) 

RETURN  IF  VEHICLE  LIST  NOT  REOUESTED 
I F (  I  EO  .  O  )  GO  TO  1 

PRINT  LIST  OF  VEHICLES  AT  STOPLINE 
I  F  (  JUN  ( K , 1 ) . EO . O )  GO  TO  1 
K  =  JUN (  K .  1  ) 

4  WR  I TE (  6  ,  1 007  )  K ,  I  CARS  IK,  N  I  ,  N t  1  ,  4  ) 

K  =  CARS  I  K ,  4  ) 

I  F ( K  EO  O )  GO  TO  1 
I  F  I  CARS  I  K ,  3 )  .  EO  O )  GO  TO  1 
GO  TO  4 

5  WRITEIB,  1O02IDSTIK)  ,  |DET(K,T)  ,T  =  1  ,2)  ,  (DET(K.T)  ,T=6,7)  .DETINT(K) 
IFlI.EO  O]  GO  TO  1 

PRINT  LIST  OF  VEHICLES  AT  OETECTOR 
I F ( DET ( K ,  1  )  .  EO  O  )  GO  TO  1 
K  =  DET  I  K  .  1  ) 

GO  TO  4 

DUMP  UNUSED  CAR  STORE,  K  >  UCST 

10  WR  I  TE  I  6  ,  1  008  ) 

11  WR I TE I  6  ,  1 007  )  K ,  ( CARS  ( K ,  I  )  ,  I  =  1  ,  4  ) 

K  =  CARS  I K ,  4  ) 

IFIK.EO  01  GO  TO  1 

GO  TO  11 

END 

SUBROUTINE  V  A R F L 0  I  N 0 C H T  ) 

IMPLICIT  INTEGER  (A-Z) 

1NTEGER«4  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 


. 


. »» t 


372  1 

3722 

3723 

3724 

3725 

372  6 

37  2  7 

3728 

3729 

3730 

373  1 

3732 

3733 

3734 

3735 

3736 

3737 

3738 

3739 

3740 

374  1 

3742 

3743 

3744 

374  5 

3746 

3747 

374  8 

3749 

3750 

375  1 

3752 

3753 

3754 

3755 

375  6 

3757 

3758 

375  9 

37  60 

37  6  1 

37  62 

37  63 

37  64 

37  65 

37  6  6 

37  67 

37  68 

37  69 

3^70 

377  1 

3772 

3773 

3774 

3775 

3776 

3777 

3778 

3779 

3780 

378  1 

3782 

3783 

3784 

3785 

378  6 

3787 

3788 

3789 

3790 

379  1 

3792 

379  3 

3794 

3795 

379  6 

3797 

3798 

379  9 

3800 

380  1 

3802 

3803 

3804 

3805 

3806 

3807 

3808 

3809 

38  10 

38  1  1 

38  12 

38  13 

38  14 

38  1  5 

38  1  6 

38  1  7 

38  1  8 

38  1  9 

3820 

382  1 

3822 

3823 

3824 

3825 

3826 

3827 

3828 

3829 

3830 

ID  OF 


INTEGERS  JUN  ,  DET  ,  ENTRY ,  JST  ,  EST  ,  DST  ,  CARS  ,  DTCN  ,  NSTOP  ,  OUTDAT  ,  COUT  , 

1  M  L  A  N  E , BLANE , LTH, VELO , DETINT , 

2CHENT , CHADEL , CHADER 

DIMENSION  J  U  N  (  7  5 , 3  O  )  ,  DET (  120,  15)  ,DECTR(75)  ,ENTRY(40,6)  , 

1 JS  T (  7  5  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4)  ,JTST(75)  ,DTCN(75)  , 

2  D  L  Y (  7  5  )  ,  NSTOP  (  75  )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3SATN(3)  ,  C  0  U  N ( 5  )  ,0CN(3)  ,  ' 

4MLANEI  6,  8)  ,BLANE(6,4)  ,LTH(75)  ,VEL0(75)  ,  D  E  T  I  N  T (  120), 

5  T  I MC  H (  4  )  ,  N  0  C  H  E (  4  )  ,N0CHD(4)  ,CHENT(40,4)  ,  CHADEL  (  120,4)  , 

6CHADER (120,4) 

COMMON  JUN,  DET,  DECTR,  ENTRY,  JST,  DST,  EST,  CARS,  MS  EC, 

1JTST,  DTCN,  DLY,  NSTOP,  OUTDAT.  COUT,  NOUT,NPER, 

2MLANE, BLANE, LTH, VELO, DETINT, BM, BUS 
C0MM0N/C0M1 /SATN , COUN , OCN , VLTH, 

1ENDT.RNGE, SPEED,  NVEH,  UCST  ,  LCST,  RN  ,  ODE  LA Y 
COMMON  /BLKFLO/  C H N 0  ,  T I MC H ,  C H E N T  ,  C H A D E L  .  C H A D E R ,  N 0 C H T T 
999  FORMAT ( 4G 10 ) 

NOCHTT  r  NOCHT 
I F (  NOCHT  .  EO  . O )  GO  TO  12 
CHNO  =  1 
P  =  COUN (  3  ) 

L  -'COUN  (  2  ) 

READ(5,999)  ( T I MCH (  I)  .  1  =  1  ,4) 

DO  10  I  =1,4 

I F ( T I MCH ( I ) . EO . O ) GO  TO  10 
READ (  5  ,  999  ) NOCHE (  I  )  ,  NOCHD  (  I  ) 

NOCHI  =  NOCHE (  I  ) 

N0CH2  =  NOCHD (I) 

DO  1  M  =  1  , P 

CHENT ( M , I )  =  ENTRY ( M , 3 ) 

1  CONTINUE 

IF(NOCHI.EO.O)  GO  TO  5 
DO  4  J:1 , NOCHI 

READ (5,999)  EP , VAL 
DO  2  K  =  1  ,  P 

IFIEP.EO.EST(K) )  GO  TO  3 

2  CONTINUE 

WR  I TE (  6  .  1 OOO ) EP 

1000  FOR  MA  T  (  '  '  ,  'ERROR  IN  VARFLO  DATA  ENTRY  POINT  NO  '  ,G5) 

3  VAL  =  VAL  *  1 O 

Z  =  VAL/36  ♦  0.5 
V  AL  =  Z 

VAL  =  VAL* 10 
CHENT ( K , I )  =  VAL 

4  CONT I NUE 

5  DO  6  P  L  =  1  ,  L 

CHADEL  (  PL  ,  I  )  =  D  E  T ( PL  ,  8  ) 

CHADER (  P  L  ,  I  )  =  D  E  T ( P  L  ,  9  ) 

6  CONTINUE 

I F  (  NOCHD  (  I  )  .  EO  0  )  GO  TO  10 
DO  9  J=1  ,  N0CH2 

READ (  5  ,  999  )  DP  ,  VALL  ,  V  A  L  R 
DO  7  K  =  1  ,  L 

I F ( DP . EO . DST I K ) ) GO  TO  8 

7  CONT I NUE 

WR  I TE (  6 ,  1 OO 1  )  DP 

1001  FORMAT!'  ', 'ERROR  IN  VARFLO  DATA  DETECTOR  NO  ',C5) 

8  CHADEL ( K, I )  =  VALL* 10 

CHADER ( K ,  1  )  s  V  A  L  R  *  10 

9  CONTINUE 


10  CONTINUE 

1 1  RETURN 

12  CHNO  =  O 
RETURN 
END 

SUBROUTINE  FLOCH 
IMPLICIT  INTEGER  (  A  -  Z  ) 

INTEGERS  MSEC,  JTST,  NOUT,  NPER,  BM,  BUS 

INTEGER**  JUN,  DET,  ENTRY,  JST,  EST,  DST,  CARS,  DTCN,  NSTOP,  OUTDAT,  COUT, 
1MLANE,  BLANE,  LTH,  VELO,  DETINT.  CHENT,  CHADEL,  CHADER 
DIMENSION  J  U  N (  7  5 , 3  O )  ,  D  E  T  (  120,  15)  ,DECTR(75)  ,  E  N  T  R  Y  (  4  O ,  6)  , 

1 J  S  T (  7  5  )  ,  D  S  T (  120)  ,EST(40)  ,CARS(750,4  )  ,JTST(75)  ,DTCN|75)  , 

2  D  L  Y  (  7  5  )  ,  NSTOP  (  75  )  ,OUTDAT(  12,3)  ,C0UT(5,2)  , 

3  S  A  T  N (  3  )  ,  C  0  U  N (  5  )  ,0CN(3)  , 

4MLANE(6,8)  ,BLANE(6,4)  ,  LTH(  75  )  ,VELD(75)  ,  DET  I  NT (  120)  . 

5  T I MC  H (  4  )  ,  N  0  C  H  E  (  4  )  ,N0CHD(4)  ,CHENT(40,4)  ,  CHADEL  (  120,4)  , 

6CHADER (120,4) 

COMMON  JUN.  DET,  DECTR,  ENTRY,  JST,  DST,  EST,  CARS, MS  EC, 

1JTST, DTCN, DLY, NSTOP, OUTDAT, COUT, NOUT, NPER, 

2MLANE,  BLANE,  LTH,  VELD,  DETINT,  BM,  BUS 
COMMON/ COM  1  /SATN,  COUN, OCN,  VLTH, 

1ENDT.RNGE, SPEED,  NVEH,  UCST,  LCST ,  RN  ,  ODE  LAY 
COMMON  /BLKFLD/  C H N 0 , T I MC H , C H E N T , C H A D E L , C H A D E R , N 0 C H T T 


1  002 
1  003 
1  004 
1  005 
1  006 


'CHANGE  OF  FLOW  PATTERN 
2  G  7  ) 

'NEW  ENTRY  INFLOW  VALUES 
'NEW  TURNING  PERCENTAGES 


3  G  7  ) 

O )  GO  TO  11 
T 1 MCH (  CHNO  )  ) 
1 002 ) CHNO .MSEC 
1  004  ) 


EO 

NE 


1  3 


1  2 
1  1 


FORMAT ( 

FORMAT ( 

FORMAT ( 

FORMAT ( 

FORMAT ( 

IFI CHNO 
I F ( MSEC 
WR  I  TE  (  6 
WR  I TE (  6 
P  =  COUN ( 3 ) 

L  =  COUN ( 2 ) 

DO  13  I  =  1  ,  P 

ENTRY( 1,3)  =  CHENT ( I , CHNO ) 

WR 1 T  E  (  6  ,  1003)EST(  I  )  ,  ENTRY  (  1 
CONT I NUE 
WR  I TE (  6 ,  1 005  ) 

DO  14  I  =  1  ,  L 

DET (  I  ,  8  )  =  CHADEL  (  I 

DET (1.9)  =  CHADER ( I 

WR  I  TE (  6  .  1 006  )  DS  T (  1  ) 

CONTINUE 
CHNO  =  CHNO  ♦  1 

I F  (  CHNO  .  GT  .  NOCHTT  ) 

CO  TO  11 
CHNO  =  O 
RETURN 
END 


NO'. 


G  3  , 


'MSEC  = ' , G7 ) 


GO  TO  11 


3  ) 


,  CHNO ) 
,  CHNO  ) 
,  DET (  I 


CHNO 


8  )  ,  DET (  1  ,  9  ) 


FILE 


, 


■ 


• 

APPENDIX  V 


Notes  on  the  BUSPAS  Input  Data 


172 


NOTES  ON  DATA  INPUT  TO  ROSIM 


GENERAL 

The  traffic  network  to  be  studied  is  represented  as  a  set  of  decision  points 
by  directed  links. 

There  are  four  basic  types  of  decision  points  a)  stopline 

b)  detector 

c)  entry  point 

d)  exit  point 

The  detector  points  are  subdivided  into  five  types,  giving  eight 
different  types  of  decision  point.  Decision  points  are  given  a  type  code  to 
differentiate  between  them. 

Type  Gode 

1  Stoplines 

2  Ordinary  Detectors  -  detect  all  vehicles 

3  Entry  points 

4  Exit  points 

5  Bus  Detectors  -  detect  buses  only 

6  Bus  stops  (  detector  )  -  impede  buses 

7  Bus  split  detectors  -  divide  the  flow  into  two  streams 
directing  buses  down  a  bus  lane 

8  Movement  split  detectors  -  divide  the  flow  into  2  or  3 
streams,  directing  vehicles  along  the  appropriate  lane, 
accordingly  to  the  direction  they  will  take  at  the  next 
stopline 

N.  B.  Types  6,  7>  8  do  not  detect  vehicles. 

There  are  some  restrictions  on  the  order  of  the  decision  points  viz 

(a)  A  stopline  may  be  followed  by  (i)  an  exit  point 

(ii)  a  detector 

(b)  A  detector  may  be  followed  by  (i)  a  detector 

(ii)  a  stopline 

(c)  An  entry  point  must  be  followed  by  a  detector 

(d)  An  exit  point  has  no  following  decision  point 
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Since  it  is  possible  for  a  detector  to  follow  another  detec 
be  taken  as  to  the  craer  in  which  the  detectors  are  specified  at 
orcer  in  which  they  will  be  processed  each  second. 


tor,  some  care  must 
input,  as  this  is  t ho 


If  detector  B  directly  follows  detector  A 

(A) - >  (B) 


then  detector  3  must  be  specified  before  detector  A,  at  input.  This  is  to  avoid 
processing  a  vehicle  twice  in  the  same  second. 

Junctions  are  controlled  by  traffic  lights,  and  up  to  four  stoplines  may  be 
specified  for  each  junction .  Tf  more  than  four  stoplines  are  required  to  obey  the  same 
traffic  signals  at  a  junction,  a  dummy  junction  must  be  included,  which  will  control 
the  additional  stoplines.  The  stoplines  controlled,  movements  and  intergreens  at  each 
stage  must  be  specified,  as  with  any  other  junction  in  the  Traffic  Signal  Control  Data. 

In  addition,  this  dummy  junction  with  its  corresponding  Master  Junction  must  be  specified 
at  input,  in  the  DUMJUN  and  MASTJN  arrays. 


DATA  INHJT 

The  following  data  must  be  supplied  at  input. 

Stopline  data 
Detector  data 
Entry  point  data 
Exit  point  data 

Varflo  data*  -  only  if  required 

Network  parameters 

'OUT'  data 
Traffic  light  data 

Fixed  time  signal  data  or  control  data 
Special  vehicle  data 
'DATA'  output  data 

'GRAPHS’  output  data  -  if  no  graphical  output  then  1  blank  card,  otherwise 


see  'GRAPHS'  notes 


. 


* 
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STOPLINE  DATA 


Punched  in  G10  format 

Last  digit 
in  column 

10  Number  of  stoplines  in  the  network. 

20  Set  to  0  if  no  printout  for  JUN,  DET,  and  ENTRY  is  required. 

30  Speed  which  movement  propogates  down  a  queue . 

Subsequent  cards:  4  cards  per  stopline. 


Last  digit 
in  column 

10 

20 

30 

40 

50 


CARD  1 

This  stopline  number. 

Opposing  stopline  number  -  need  only  be  specified  if  vehicles  at  the 
opposing  stopline  should  impede  the  left  turners  at  this  stopline . 
The  number  of  left  turners  which  may  be  released  from  this  stopline 
during  the  first  second  of  intergreen. 

The  distance  in  meters,  between  this  stopline  and  the  preceding 
stopline.  Set  to  /  if  no  preceding  stopline. 

The  average  velocity,  in  km/hr,  along  the  link  leading  to  this 
stopline . 


Cards  2,  3»  4  give  data  concerning  the  next  sublink  and  the  decision  point 
in  the  through,  left  and  right  directions  respectively. 


Last  digit  CARDS  2(3,  4) 

in  column 

10  Next  decision  point  number  in  through  (left,  right)  direction. 

20  Saturation  flow  in  vehs/hr,  for  vehicles  leaving  this  stopline  in 

through  (left,  right)  direction. 

If  a  combined  saturation  flow  is  required  for  two  or  three  movements, 
the  combined  saturation  flow  is  placed  in  the  position  corresponding 
to  the  first  movement  and  the  other  movements  are  referenced  to  it. 

eg.  If  the  saturation  flow  for  each  movement  is  1000  veh/hr  and  if  (  ) 
indicates  combined,  the  appropriate  values  in  the  2,  3  and  4th  cards  for 
the  different  situations  should  be 


■ 
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(T)  2nd  card 

(L)  3rd  Card 

(S)  4th 

T,L,R 

1000 

1000 

1000 

(T  Ljk 

2000 

-1 

1000 

( T  Lx ) 

3000 

-1 

-1 

T(  LR) 

1000 

2000 

-2 

L(TR) 

2000 

1000 

-1 

Tne  number  of  lanes  on  the  sublink  between  this  stopline  and  the  next 
point  in  the  through  (left,  right)  direction. 

The  average  velocity  in  km/hr,  along  the  next  link  in  the  through  (left, 
right)  direction. 

distance,  in  metres,  between  this  stopline  and  the  next  decision  point 
in  the  througn  (left,  right)  direction. 


' 
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DETECTOR  DATA 

Punched  in  GIO  format 

1st  card:  Number  of  detectors  in  the  network 

Subsequent  cards: 

1  card  per  detector  -  all  types 

1  additional  card  per  detector  -  types  7  and  8  only 
following  first  card 

Detector  Data  sheet 


last  ai£it 
in  column 


10 


detector  number 


20 


next  decision  point  number  (in  through  direction  for  type  8) 

(in  ord.  vehicle  div.  for  type  7) 


30 


distance,  in  metres,  between  this  detector  and  the  next  decision 
point . 


40 


number  of  lanes  on  sublink  between  this  detector  and  next  decision  ooint 


50 


10  x  (percentage  of  the  vehicles  passing  over  this  detector  which 
should  turn  left  at  the  next  stopline). 


60 


10  x  (percentage  of  the  vehicles  passing  over  this  detector  which 
should  turn  right  at  the  next  stop'line). 


70 


Type  code  of  this  detector  (2,  5>  6*  7  or  8; 


80 


Type  code  of  next  decision  point  (1,  2,  5*  8,  7  or  8) 


'• Additional j  Detector  Data  Dneet 
/  . 

wu  Bus  split  detectors 


. 


. 
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last  digit 
in  column. 


10 

Next  decision  point  number  along  bus  only  lane 

20 

Type  of  the  next  decision  point  along  bus  lane 

30 

Distance  in  metres  between  this  detector  and  the  next  decision  pt. 
along  bus  lane. 

40 

Number  of  lanes  on  sublink  between  this  detector  and  the  next  decision 

point  along  bus  lane. 

(b)  Movement 

Split  detectors 

last  digit 
in  column 

10  (50) 

Next  decision  point  along  left  (right)  lane 

20  (60) 

Type  of  the  decision  put  along  left( right)  lane 

30  (70) 

Distance,  in  metres,  between  this  detector  and  the  next  decision 

point  along  left  (right)  lane. 

40  (30) 

Number  of  lanes  on  sub  link  between  this  detector  and  the  next  decisior 

pt  along  left  (right)  lane. 

ENTRY  POINT  DATA 


Punched  in  GIO  format 

Last  digit 
in  column 

10  Number  of  Entry  points  in  the  network. 

20  The  number  of  times  the  flow  pattern  is  to  be  changed. 

See  VARFLO  data  if  required. 

Subsequent  cards:  1  card  per  Entry  point. 


Last  digit 
in  column 

10 

20 

30 

40 


Entry  point  number. 

Flow  in  veh/hr  at  entry  point. 

Number  of  the  detector  to  which  this  entry  point  leads. 

Time  taken  in  secs  (  usually  zero  if  entry  point  is  on  boundary 
of  network  before  vehicles  entering  reach  the  next  detector. 


EXIT  POINT  DATA 

Punched  in  G10  format 

First  card:  Number  of  exit  points. 

Subsequent  cards:  1  card  per  8  Exit  points. 

A  list  of  the  numbers  of  the  exit  points  is  required. 


. 
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VARFLO  DATA  (  REQUIRED  ONLY  IF  NECESSARY  ) 

A  facility  whereby  at  different  times  during  a  simulation  run,  the  flow 
pattern  may  be  changed  has  been  incorporated  into  ROSIM. 


The  flow  pattern  may  be  changed  up  to  four  times.  Both  the  inflow  rates  at  Entry 
Points  and  the  percentage  turning  movements  at  stoplines  may  be  changed. 

If  it  is  wished  to  change  flow  pattern,  then  the  following  data  must  be  submitted. 

(i)  On  the  first  card  of  the  Entry  Data,  the  number  of  times  it  is  desired 
to  change  flow  pattern  (0-4)  must  be  given, 
i.e  the  first  card  of  Entry  Data  should  now  read: 

Column  Ending 

10  The  number  of  Entry  Points  in  the  network 
•  20  The  number  of  times  the  flow  pattern  is  to  be  changed. 

t 

( 

(ii)  The  following  cards  should  be  submitted  after  the  EXIT  data. 

Column  Ending  CARD  1 

'10  (20,  30,  40)  The  time  in  seconds  that  the  1st  (2nd,  3rd,  4th) 
change  of  flows  should  occur. 

CARD  A 

10  The  number  of  Entry  Points  at  which  the  inflow  rate  is  to  be  changed 
20  The  number  of  detectors  at  which  the  percentage  turning  movements 


are  to  be  changed. 
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CARD  B 

The  number  of  cards  type  B  which  are  submitted  should  be  the  number 
specified  on  card  A.  If -no  Entry  Points  are  to  be  changed  then  no  cards 
type  B  are  required. 

10  The  Entry  Point  Number 

20  The  new  value  of  the  Entry  flow  in  vehs/hour. 


CARD  C 

The  number  of  cards  type  C  which  are  submitted  should  be  the  number 
specified  on  Card  A.  If  no  Detector  tuning  movements  are  to  be  changed, 
then  no  cards  need  to  be  submitted. 

10  The  detector  no. 

20  The  new  value  of  the  percentage  number  of  vehicles  turning  left  x  10. 

30  The  new  value  of  the  percentage  number  of  vehicles  turning  right  x  10. 

NB.  If  no  change  is  specified  at  a  detector  or  entry  point,  then  the  value  in  the 
original  entry  and  detector  data  is  assumed.  NOT  the  value  specified  in  the  previous 
change . 


'  3  * 
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.  iETWOPK  PARAMETERS 


Punched  in  110  format 


Last  digit 
in  column 


1st  card 


10  Vehicle  length,  in  metres.  Average  space  occupied  by  a  stationary, 

(queued)  vehicle  -  usually  taken  to  be  6  metres. 


.20  End  Time.  The  time  in  secs  at  which  the  simulation  run  should 

terminate. 


30 


Velocity  range  -  defines  the  range  over  which  vehicles  can  have  a 
velocity  and  is  such  that  if  M.S.  is  the  mean  speed  on  a  link 


M  -  B  ) 
v  100 ; 


MS  <  veh  vel  ^  MS  ( 1  + 


VR  - 
100' 


40  The  speed,  in  km/hr,  given  to  all  vehicles  when  they  first  enter  the 

network  (ie  before  they  reach  a  stopline) 

2nd  card 


10 


10 


Any  seven  figure  number  -  the  random  number  generator  seed. 

c« 

3rd  card 

The  maximum  number  of  vehicles  which  are  allowed  in  the  network  at  any 


one 


time . 


. 
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'OUT'  Data 


If  no  'OUT'  output:  is  required,  a  blank,  card  is  submitted. 


This  routine,  for  specified  decision  points  (stoplines  or  detectors  only),  and 
for  specified  time  periods,  outputs  each  second,  information  relating  to  the  decision 
point,  and  to  the  vehicles  at  the  decision  point. 


last  digit 
in  column 


FIRST  CARD  (G10  format) 


10 


The  number  of  periods  (up  to  3)  at  which  time  'OUT'  output  is 
required. 


20 

30  (50,?0J 


The  number  of  decision  points  for  which  information  is  required. 


The  time,  in  seconds  at  which  'OUT'  output  should  start  for  the  1st 

* 

(2nd,  3ra)  period. 


40  (60, 80) 


The  time,  in  seconds,  at  which  'OUT'  output  should  stop  for  the  1st 
(2nd,  3rd)  period. 


4 


8 


SECOND  CARD  (G4  format) 

Marker  =  1  if  a  print  out  of  the  vehicles  at  the  decision  point  is 
required  0  otherwise. 

Type  of  this  decision  point  1  =  stopline,  2  =  detector  (any  type; 


12 


Decision  point  number 


The  other  decision  points  for  which  'OUT'  output 
or.  the  same  earn. 


is  rewired  are  specified  similarly 


A 


* 

■ 


' 
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TRAFFIC  LIGHT  AND  JUNCTION  DATA 


Punched  in  G4  format 


First  Card 


Last  digit 
in  column 


4 


8 


ihe  number  oi  junctions  (including  dummy  junctions)  in  the  nei 


.work. 


Marker  _  2  if  a  listing  of  the  junctions  with  their  internal  numbers 
is  required  0  otherwise. 


12 


Ghift  of  green.  The  delay  required  between  calling  and  implementing  a 
change  of  stage. 


16 


"The  number  of  dummy  junctions  in  the  network. 


Following  cards  :  Dummy  junction  data 


1  card  per  dummy  junction  (no  cards  if  no  dummy  jns.) 


4 


Dummy  junction  Number 


Corresponding  master  junction  number. 


Subseouent  cards 


2  cards  oer 


junction  (including  dummy  junctions).  On  the  1st  of  these  cards,  the 
stoplines  (4  at  most;  which  the  traffic  signals  at  this  junction  control,  the 
stage  numbers  (4  stages  at  most)  and  the  intergreen  perious  are  specified. 


4 


J  un  c  t  i  o  n  N  urn  b  e  r 


8(12;  i 6 ,  20)  Arm  1  (2,  d,  4;  -  the  number*  of  the  1st  (2na,  vrd,  4th)  slopline 

which  the  traffic  light  at  the  junction  has  control. 


ove 


12,40,48;  The  stage  numbers 
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23  ( 36, 44, 52)  The  length  of  the  intergreen  period  in  seconds,  which  precedes  the 

stage  specified  in  24th  (32,  40,  48)  place. 


Cara  2  contains  information  relating  to  the  stages,  for  each  stage  it  specifies  which 
arms  are  green  ( 2  at  most)  arid  in  which  direction  vehicles  leaving  the  stopline  can 
depart  -  it  is  thus  possible  to  allow  right  turners  (say)  to  leave  a  stopline  while 
stopping  through  and  left  turning  vehicles. 

4  The  stage  number 


3(16) 


12(20) 


NB 


The  arm  number  (1,  2,  3»  or  4  which  relates  to  the  stopline  numbers 
specified  on  card  1)  over  which  vehicles  can  pass  during  this  stage. 

A  code,  signifying  the  direction  in  which  the  vehicles  must  be  going 
if  they  are  to  be  allowed  to  pass. 


[•iovement  allowed 

Binary 

notation 

Code 

rn 

X 

0 

0  1 

1 

L 

0 

1  0 

2 

R 

1 

0  0 

4 

LT 

0 

1  1 

3 

RT 

1 

0  1 

5 

RL 

1 

1  0 

6 

RLT 

1 

1  1 

7 

R 

ie  in  RLT  L  =  1 

if  movement* 

allowed  = 

0  if  no.  Code  =  value  of  kLT 

T 

in  inary. 

Details  of  the  other 

stages  are 

specified 

similarly . 

If  a  stopline  or  a  particular  movement  at  a  stopline  at  a  junction,  is 
not  specified  in "the  data,  then  vehicles  will  pass,  unimpeded  oy  2ne 

traffic  lights. 


. 


Vehicle  Activation  Routines  in  ROSIM 
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VAREAD  Reads  in  V.A.  data 

VAGT  Produces  stage  changes 

TLREAD  Reads  in  stage  change  data 

VAGHST  Changes  stage 


VAREAD  DATA 

ail  cards  in  G5  format 

Column  Ending 

Card  1 

5 

Number  of  junctions  in  the  network, 

(Not  including  Dummy  junctions) 

10 

Extension  produced  by  the  detectors  ' 

5 

Subsequent  cards  -  3  cards  per  junction 

-  Card  A 

Junction  No 

10 

Number  of  stages  at  this  junction 

15 

No  of  the  stage  which  follows  stage  1 

20 

»*  2 

25- 

»  3 

3Q 

11  4 

35 

Minimum  green  for  stage  1 

40 

it  2 

45 

.  .»  3 

50 

11  4 

55 

Maximum  green  for  stage  1 

60 

.1  2 

65 

"  3 

n  ■' 

' 

11  4 

. 
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Column  Ending 
5  (10) 

15  (20,  25,  30,  35,  40) 

45  (50) 

55  (60,  65,  70,  75,  8o) 


Card  B 

1st  (2nd)  demand  detector  for  stage  1 

1st  (2nd,  3rd,  4th,  5th,  6th)  extension  detector 

for  stage  1 

1st  (2nd)  demand  detector  for  stage  2 

1st  (2nd,  3rd,  4th,  5th,  6th)  extension  detector 

for  stage  2 


Card 

L  C 

3  (10) 

1st 

(2nd) 

15 

(20, 

25, 

30, 

35, 

40) 

1st 

(2nd, 

for 

stage 

45 

(50) 

1st 

(2nd) 

53 

(60, 

65, 

70, 

75, 

8o) 

1st 

(2nd, 

for 

stage 

demand  detector  for  stage  3 

3rd,  4th,  5th,  6th)  extension  detector 

3 

demand  detector  for  stage  4 

3rd,  4th,  5th,  6th)  extension  detector 

4 


N.B.  In  the  traffic  light  change  stage  da£a,  the  Dummy  junctions  should  be 


placed  at  the  end  of  the  data. 
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SPECIAL  VEHICLES  DATA  (  BUSES  ) 


Punched  in  G10  format 

Last  digit 
in  column 

10  Number  of  special  vehicles  requested. 

20  N  -  start  a  special  vehicle  on  the  Nth  ordinary  vehicle  after 

start  time . 


Subsequent  cards:  1  card  per  special  vehicle 


Last  digit 
in  column 

10 

20 

30 

40 


50  &  60 


70 


Start  time  of  this  special  vehicle,  in  seconds. 

The  detector  at  which  the  special  vehicle  starts. 

Always  $ 

Up  to  7  prestored  turning  codes  are  specified  here. 

Code:  1  =  through,  2  =  left,  3  =  right.  The  code  at  the  least 

significant  place  is  used  first, 
e.g.  0000321 

At  the  first  stopline  the  vehicle  goes  through,  at  the  next  left, 
and  at  the  next  right. 

Further  perstored  turning  codes.  After  using  the  codes  in  the 
previous  word,  the  SV  then  uses  the  codes  in  word  50,  and 
finally  in  60. 

Journey  type  for  SV  summary. 
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SUBROUTINE  SVREAD 


Reads  in  data  for  special  vehicle  priority  routines 

Punched  in  15  format 

Last  digit 
in  column 

5  Extension  produced  by  S.V.  extension  detectors. 

10  No.  of  S.V.  demand  detector.  (  If  n  >  2  ,  uses  the  first 

'n'  extend  detector  as  demand  detector  ) 

3  subsequent  cards  for  each  junction 

First  card 

External  junction  number 
First  stage  of  this  junction 
Extra  green  to  compensate  l3t  stage 

2nd 
3rd  . 

4th 

Special  vehicle  maximum  green  for  1st  stage  (extra  green 

given  after  V.A.  max  green) 
2nd 
3rd 
4th 

Second  card 

1st  (second)  S.V.  demand  detector  for  stage  1 
1st  (2nd,  3rd,  4th,  5th,  6th)  S.V.  extension  detector  for 

stage  1 

S.V.  demand  detectors ^ for  stage  2 
S.V.  extension  detectors  for  stage  2 

Third  card 

S.V.  detectors  for  stage  3  and  ^  -  same  format  as 
for  previous  card. 


5  (io) 

15  (20,  25,  30,  35,  40) 
45  (50) 

55  (60,  65,  70,  75,  80 ) 


Last  digit 
in  column 

5 

10 

15 

20 

25 

3© 

35 

40 

45 

50 


•- 


' 


'DATA'  OUTPUT  DATA 


First  Card:  Punched  in  G10  format 


Last  digit 
in  column 

10 

20 

30 

40 

50 


The  time,  in  seconds,  at  which  'DATA'  output  for  the  network 
should  start . 

The  time,  in  seconds,  between  successive  'DATA'  outputs. 

The  number  of  stoplines  for  which  the  final  'DATA'  output 
is  required. 

The  increment  for  delay  histogram  data  (  default  =  2  )  . 

Set  to  $  if  all  ouput  is  required,  a  value  other  than  zero 
will  give  a  printout  of  stage  changes  and  special  vehicle 
journeys  being  suppressed. 


Subsequent  card(s):  Punched  in  G5  format 

A  list  of  stopline  numbers  (  16  per  card  )  for  which  'DATA'  output  is 
required . 

N.B.  Stoplines,  downstream  from  Entry  points  should  not  be  called  for 
'DATA'  putput. 


HO  3  IK  : 


GRAPHICAL  OUTPUT 
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a  facility ,  whereby  the  average  rraiTiDer  oi  vehicles  queuing  in  specified  parts 
01  the network,  over  specined  incremental  periods  of  time,  is  outout  in  graphical 
form,  has  been  incorporated  into  the  simulation.  To  accommodate  this,  additional 
cards  (if  no  graphical  output  required  then  1  blank  card)  must  be  submitted  after 
the  'Lata'  output  data  (ie.  at  the  end  of  the  present  card  pack). 

Up  to  5  graphs  may  be  output 

The  following  cards  must  be  submitted. 


Column  ending 


1st  card 


G10  format 


10 

P0 

30 


Start  time  (in  seconds)  at  which  graphical  output  is  required, 
End  time  (in  seconds) 

Incremental  period  (in  seconds) 

(ie.  if  -  4  say,  then  every  4  secs  the  average  delay 

per  second  over  the  previous  4  sec  period  will  be  output). 


2nd  card 


G10  format 


10  (20,30,40,50) 


Specifies  the  part(s)  of  the  network  for  which  output  is 
required  for  the  1st  (2nd,  3rd,  4th,  5th)  graph(s),  using 
the  following  code 


0 

9999 

Y 


-  X 


no  grapn 
all  links 

y  ^  9999,  Y  -*•  0  one  specific  link  Y 
(MB.  links  are  denoted  by  the  stopline  no, 
at  the  end  of  the  link) 


fi  ed 


X>0,  a  group  of  X  links  wnich  are  spec  ill 


on  additional  cards  in  the  following  iormat. 
The  stoplines  to  be  included  are  punched  in 


G5  format  in  the  first  9X  columns  o; 


Uif  o; 


. 
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3rd  card  -  G5  format 


5  (20,35,50,63) 


10(25,40,55,70) 


15(30,45,60,75) 


'i'he  position  (1  -  125 )  across  the  page  of  computer  output, 
at  which  the  graph  is  to  be  printed. 

The  datum  of  the  graph  the  no.  of  vehicles  queued 
which  is  represted  by  the  axis. 

Scaling  factor  :  x  ^  that  each  *  output  represents 
an  average  over  the  incremental  period  of  x  vehicles 
queued  per  second. 


1 

2 

3 


<  4th  card 

blank. 

1  the  symbol  which  is  to  form  the  axis. 

*  the  symbol  which  is  to  be  output  to  indicate 

vehicles  queued. 


APPENDIX  VI 


TRANSYT  Output  for  the  AM  Peak  with  Two  Bus  Links 
and  a  Bus  Delay  Weighting  of  20 
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APPENDIX  VIII 


TRANSYT  Output  for  the  AM  Peak  with  One  Bus  Link  Only 
and  a  Bus  Delay  Weighting  of  20 
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APPENDIX  IX 


Significance  Testing  of  the  Operating  and  Running  Speeds 


on  Jasper  Avenue  from  1  1  1  Street  to  117  Street 


**  N 


271 


AM  EASTBOUND  AUTO  OPERATING  SPEED 


Before 

n  =  1 2  x=l 8.07 

s=4 

.68 

After 

n=l  2  x=25 . 69 

s  =  6 

.25 

- 

Null  hypothesis 

Ho 

:  UA  =  u 

Alternate  hypothesis 

H1 

:  uA  f  u 

/  n-j  n2  (  n]  +  n2  -  2  ) 

/  ^  +  n2  /(  n i-l  )sx2 


-  1 


1 12  x  12  (  12  +  12  -  2~) 

V  12+12 


25.67  -  18.07 


11  x  6.252  +  11  x  4.682 


=  3.381 

For  95%  confidence 

1025,  22  =  2.074 

Null  hypothesis  is  rejected. 

There  is  a  significant  difference  between  the  before  and  after  cases. 
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EASTBOUND  AUTO 

RUNNING  SPEED 

Before 

n=l 2  x=29 . 53 

s=2 .57 

After 

n=l 2  x=37 . 31 

s=4 . 36 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H-,  :  uA  f  u 

12  x  12  (  12  +  12  -  2  ) 


37.31  -  29.53 


12  +  12 


'll  x  2.572  +  1  1  x  4.362 


=  5.325 


For  95 %  confidence 


t .025 ,  22 


2.074 


Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  running  speeds  for  the 
before  and  after  cases. 
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EASTBOUND  BUS 

OPERATING  SPEED 

Before 

n=l 5  x= 1 2.54 

s=2.86 

After 

n=l  5  x=l 3 . 79 

s=l .68 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H-j  :  u^  f  u 

t 


o 


/l5  x  15  (  15  +  15  -  2  ) 

J  15  +  15 


14  x  2.86 


13.79  - 
2  +  14  x 


=  1.460 


For  95°4  confidence 


.025,  28 


2.048 


12.54 

2 

1  .68^ 


Null  hypothesis  is  accepted. 

There  is  no  difference  between  the  population  mean  of  operating  speeds 
for  the  before  and  after  cases. 
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EASTBOUND  BUS 

RUNNING  SPEED 

Before 

n=l  5  x=25 . 56 

s=5 .05 

After 

n=l  5  x=27 . 78 

s=2 . 38 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H-,  :  uA  f  u 

o 


15x15(15  +  15-2) 


15  +  15 


27.78  -  25.56 


'14  x  5.052  +  1  4  x  2.382 


=  1.540 


For  95%  confidence 

l. 025,  28  =  2.048 

>  t 

o 

Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  running  speeds  for  the  before  and 


after  cases. 


i?  tA  ' 
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WESTBOUND  AUTO 

OPEPATING  SPEED 

Before 

n = 1 2  x=24 . 1 9 

s=2 .97 

After 

n=l 2  x=28 . 1 3 

s=4 . 72 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H1  :  UA  *  u 

'o 


12  x  12  (  12  +  12  -  2  ) 


28.13  -  24.19 


12  +  12 


11  x  2.972  +  11  x  4.722 


=  2.447 

For  95%  confidence 

1 .025 ,  22  =  2.074 

<  t 

o 

Null  hypothesis  is  rejected. 

Alternate  hypothesis  is  accepted  and  there  is  a  significant  difference 
between  the  operating  speeds  of  the  before  and  after  cases. 


AM  WESTBOUND  AUTO  RUNNING  SPEED 


Before 

n = 1 2  x=35 . 83 

s=2 .93 

After 

n=l  2  x=39 . 32 

s=3 . 36 

Null  hypothesis 

H  :  u 
0 

Alternate  hypothesis 

H-|  :  u 

o 


12  x  12  (  12  +  12  -  2  ) 


39.32  -  35.83 


12  +  12 


'll  x  2.932  +  1  1  x  3.362 


=  2.712 


For  95%  confidence 

t. 025,22  =  2.074 

<  to 

Null  hypothesis  is  rejected. 

There  is  a  difference  in  the  population  mean  of  the  running  speeds 
for  the  before  and  after  cases . 
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WESTBOUND  BUS 

OPERATING  SPEED 

Before 

n=l 4  x=l 6 . 86 

s=l .92 

After 

n  =  1 4  x=20. 46 

s=2 . 33 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H-j  :  uA  f  u 

14  x  14  (  14  +  14  -  2  ) 


20.46  -  16.86 


14  +  14 


1  3  x  1  .922  +  1  3  x  2.332 


=  4.462 


For  95 %  confidence 

t . 025 ,  26  =  2‘056 

<  4o 

Null  hypothesis  is  rejected. 

There  is  a  significant  difference  between  the  operating  speeds  for 


the  before  and  after  cases. 
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AM  WESTBOUND  BIJS  RUNNING 

Before 

After 


SPEED 

n  =  l  4 

x=25 . 1 5 

s  =  l  .69 

n=l  4 

x=30 . 42 

s=2 .42 

Null  hypothesis  Hq  :  =  ug 

Alternate  hypothesis  :  u^  f  ug 


14x14(14  +  14-2) 


30.42  -  25.12 


14  +  14 


13  x  1  .692  +  1  3  x  2.422 


=  6.680 


For  95%  confidence 

*.025,  26  =  2'056 

' 

Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  running  speeds  for  the 
before  and  after  cases. 


. 

. 
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EASTBOUND  AUTO 

OPERATING  SPEED 

Before 

n  =  l 2  x = 1 8 . 5 1 

s=2 . 30 

After 

n=l 2  x=20 .74 

s=3 . 05 

Null  hypothesis 

H  :  u 
0 

Alternate  hypothesis 

H.|  :  u 

=  u 

t  u 


B 

B 


12  x  12  (  12  +  12  -  2  ) 


12  +  12 


20.74  -  18.51 
x  2.302  +  1  1  x  3.052 


=  2.022 


For  95°4  confidence 


.025,  22 


2.074 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  operating  speeds  between  the  before  and 


after  cases . 


280 


PM  EASTBOUND  AUTO  RUNNING  SPEED 


Before 

After 


n=l 2  x=35.44  s=4.92 
n=l 2  x=36 . 75  s=2.70 


Null  hypothesis 


Ho  :  UA  UB 


Alternate  hypothesis 


H1  :  UA  *  UB 


12  x  12  (  12  +  12  -  2  ) 


36.75  -  35.44 


12  +  12 


11  x  2.702  +  11  x  4.922 


0.809 


For  95%  confidence 


.025,  22 


2.074 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  running  speeds  for  the  before  and 


after  cases . 


281 


EASTBOIJND  BUS 

OPERATING  SPEED 

Before 

n=l 3  x=l 2 . 89 

s=2 .21 

After 

n=13  x=14.06 

s=3 .1  7 

Null  hypothesis 

H  :  un  =  u 
o  A 

Alternate  hypothesis 

H-|  :  uA  f  u 

n  3  x  13  (  13  +  13  -  2  ) 


14.06  -  12.80 


13  +  13 


M  2  x  2 .21 2  +  12  x  3.172 


=  1.092 


For  95%  confidence 


1(325,  24 


2.064 


> 


t 


0 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  population  means  of  the  operating  speed 


between  the  before  and  after  cases. 
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PM  EASTBOUND  BUS  RUNNING  SPEED 


Before  n=l 3  x=25.94  s=2 . 97 

After  n=l 3  x=29.84  s=5.29 


Null  hypothesis  H  :  un  =  uD 

0  A  D 

Alternate  hypothesis  :  UA  ^  uB 


tQ  =  /13  x  13  (  13  +  13  -  2  ) 


29.84  -  25.94 


13  +  13 


12  x  2.972  +  12  x  5.292 


=  2.318 


For  95%  confidence 

t .025 ,  24  =  2,064 

<to 

Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  running  speeds  for  the 


before  and  after  cases. 


■ 


283 


WESTBOUND  AUTO 

OPERATING  SPEED 

Before 

n=l  2  x=22 .79 

s=5 . 34 

After 

n=l 2  x=22 . 81 

s=7 . 52 

Null  hypothesis 

H  :  un  =  u 
o  A 

Alternate  hypothesis 

H-,  :  uA  f  u 

12  x  12  (  12  +  12  -  2  ) 


22.81  -  22.79 


12  +  12 


'll  x  5.342  +  1  1  x  7.522 


=  0.008 


For  95%  confidence 

^ .025 ,  22  =  2.074 

>  t 

o 

Null  hypothesis  is  accepted. 

There  is  no  difference  between  the  before  and  after  cases. 


' 

■ 
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PM  WESTBOUND  AUTO  RUNNING  SPEED 


Before  n = 1 2  x=28.96  s=4.08 

After  n=l 2  x=34.47  s=3.67 


Null  hypothesis 
Alternate  hypothesis 


Ho  :  UA  =  UB 


H1  :  UA  *  UB 


f12  x  12  (  12  +  12  -  2  ) 


12  +  12 


34.47  -  28.96 


'11  x  3.672  +  11  x  4.082 


3.478 


For  95%  confidence 


.025,  22 


2.074 


<  t 


o 


Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  population  mean  of  the 
running  speeds  between  the  before  and  after  cases. 
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WESTBOUND  BUS 

OPERATING  SPEED 

Before 

n=l 4  x=l 5 . 29 

s=2 .41 

After 

n=l  4  x=l 5 . 39 

s=2 . 58 

Null  hypothesis 

Ho  :  UA  =  u 

Alternate  hypothesis 

H-j  :  u^  /  u 

'14  x  14  (  14  +  14  -  2  ) 


15.39  -  15.29 


14  +  14 


'13  x  2 .41 2  +  13  x  2.582 


0.106 


For  95%  confidence 


.025,  26 


=  2.056 


Null  hypothesis  is  accepted. 

There  is  no  difference  between  the  operating  speeds  for  the  before 


and  after  cases. 


s 
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PM  WESTBOUND  BUS  RUNNING  SPEED 


Before 

After 


n=l 4  x=25 . 20  s=2.42 
n  =  l 4  x=27 . 03  s =2 . 69 


Null  hypothesis 


Alternate  hypothesis 


Ho  :  UA  =  UB 


H1  :  UA  *  UB 


(14  x  14  (  14  +  14-2) 


14  +  14 


27.03  -  25.20 


/l  3  x  2.422  +  1  3  x  2.692 


1.892 


For  95%  confidence 


.025,  26 


2.056 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  running  speeds  for  the  before  and 


after  cases . 


. 


s 

APPENDIX  X 


Significance  Testing  of  the  Total  Average  Approach  Delay 
on  Jasper  Avenue  from  1  1  1  Street  to  117  Street 


288 


AM  EASTBOUND  AUTO  (  TOTAL  AVERAGE  APPROACH  nELAY  ) 


Before 

After 


n=48  x=l 7.21  s=l 9 . 98 

n=48  x=  9.83  s=l 4 . 35 


Null  hypothesis 
Alternate  hypothesis 


Ho  :  UA  =  UB 


H1  :  UA  *  UB 


Pln2  (  ni  +  n2  "  2  ) 


x  -  y 


nl  +  n2 


k  n1  -  1  )sx2  +  (  n2-  1  )sy2 


48  x  48  (  48  +  48  -  2  ) 


48  +  48 


17.21  -  9.83 


47  x  1  4. 352  +  47  x  1  Q.982 


=  2.079 


For  95%  confidence 


t.025,  94 


1.960 


< 


t 


0 


Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  total  average  approach 
delay  between  the  before  and  after  cases. 
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AM  EASTBOUND  BUS  (  TOTAL  AVERAGE  APPROACH  DELAY  ) 


Before 

After 


n=60  x=ll . 68  s=l 4 . 33 
n=60  x=  6.90  s=l 2 . 04 


Null  hypothesis 
Alternate  hypothesis 


Ho  :  UA  =  UB 
H1  :  UA  *  UB 


'0 


60  x  60  (  60  +  60  -  2  ) 


60  +  60 


11 .68  -  6.90 


59  x  14.332+  59  x  12. 042 


=  1.978 


For  95%  confidence 


.025,  118 


1  .960 


<  t 


Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  total  average  approach  delay 
between  the  before  and  after  cases. 
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AM  WESTBOUND  AUTO  (  TOTAL  AVERAGE  APPROACH  "ELAY  ) 


Before 

After 


n=36  x=l 2.25  s=l 2 . 92 
n=36  x=10.50  s =1 3.10 


Null  hypothesis  Hq  :  u^  =  ug 

Alternate  hypothesis  :  u^  f  Ug 


'36  x  36  (  36  +  36  -  2  ) 


12.25  -  10.50 


36  +  36 


35  x  12. 922  +  35  x  1  3. 102 


0.571 


For  95%  confidence 


.025,  70 


1  .960 


>  t 


o 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  total  average  approach  delay  between 
the  before  and  after  cases. 
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AM  WESTBOUND  BUS  (  TOTAL  AVERAGE  APPROACH  DELAY  ) 


Before 

After 


n=42  x=8.74 


n=42  x=5 . 67 


s=l 2 . 41 


s=  9.64 


Null  hypothesis 


Ho  :  UA  UB 


Alternate  hypothesis 


H1  :  >  *  UB 


42  x  42  (  42  +  42  -  2  ) 


42  +  42 


8.74  -  5.67 


41  x  1 2 . 41 2  +  41  x  9.642 


=  1.266 


For  95%  confidence 


^ .025 ,  82 


1.960 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  total  average  approach  delay  between 
the  before  and  after  cases. 


. 
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PM  EASTBOUND  AUTO  (  TOTAL  AVERAGE  APPROACH  DELAY  ) 


Before 

After 


n=48  x=l 8.33  s=l 7 . 31 
n=48  x=l 7 . 08  s  =  l 5 . 54 


Null  hypothesis 


Ho  :  UA  =  UB 


Alternate  hypothesis 


H1  :  UA  *  UB 


48  x  48  (  48  +  48  -  2  ) 


18.33  -  17.08 


48  +  48 


47  x  1  7. 31 2  +  47  x  1  5.542 


0.372 


For  95%  confidence 


.025,  94 


1.960 


o 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  total  average  approach  delay  between 
the  before  and  after  cases. 
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PM  EASTBOUND  BUS  (  TOTAL  AVERAGE  APPROACH  DELAY  ) 


Before 


n=52  x=l 5 . 04  s=l 5 . 77 


After 


n  =  52  x=l 3. 00  s=l 6 . 45 


Null  hypothesis 


Alternate  hypothesis  /  uR 


t 


o 


52  x  52  (  52  +  52  -  2  ) 


15.04  -  13.00 


52  +  52 


/ 


51  x  1  5. 772  +  51  x  1  6. 452 


0.646 


For  95%  confidence 

1 .025 ,  102  =  1.960 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  total  average  approach  delay  between 
the  before  and  after  cases. 
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PM  WESTBOUND  AUTO  (  TOTAL  AVERAGE  APPROACH  nELAY  ) 


Before 

After 


n=36  x=l 7.58  s=16.76 
n=36  x=  8.42  s=14.46 


Null  hypothesis 
Alternate  hypothesis 


Ho  :  UA  =  UB 


H1  :  UA  f  UB 


36  x  36  (  36  +  36  -  2  ) 


17.58  -  8.42 


36  +  36 


35  x  1  6. 762  +  35  x  1  4. 462 


=  2.483 


For  95%  confidence 


t. 025,70 


1  . 950 


Null  hypothesis  is  rejected. 

There  is  a  significant  difference  in  the  total  average  approach  delay 
between  the  before  and  after  cases. 
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PM  WESTBOUND  BUS  (  TOTAL  AVERAGE  APPROACH  DELAY  ) 


Before 

After 


n=42  x=l n . 43  s=l 4 . 77 

n=42  x=  8.48  s  =  l 2 . 11 


Null  hypothesis  Hq  :  u^  =  ug 

Alternate  hypothesis  :  u^  /  Ug 


o 


42  x  42  (  42  +  42  -  2  ) 


10.43  -  8.48 


42  +  42 


41  x  14. 772  +  41  x  12. II2 


=  0.662 


For  95%  confidence 


1 .025 ,  82 


1  .9*0 


Null  hypothesis  is  accepted. 

There  is  no  difference  in  the  total  average  approach  delay  between 
the  before  and  after  cases. 


. 

APPENDIX  XI 


TRANSYT  Output  for  the  AM  Peak  with  Two  Bus  Links 
and  a  Bus  Delay  Weighting  of  30 
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APPENDIX  XII 


TRANSYT  Output  for  the  AM  Peak  with  Two  Bus  Links 
and  a  Bus  Delay  Weighting  of  1 0 
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834  168  1550  39  82.32 
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APPENDIX  XIII 


TRANSYT  Output  for  the  AM  Peak  with  Two  Bus  Links 
and  a  Bus  Delay  Weighting  of  5 


J 


y~>‘ 


LU 

in 

> 

o 

LU 

X 

t— 1 

H 

o 

Q. 

> 

Z 

O 

in 

CD 

z 

< 

DC 

LU 

in 

—1 

< 

o 

o 

_J 

in 

LU 

329 


CM 


00 

F- 


SC 

< 


LO 


Q  X 

O  t— 

W  o  o 

do  z  u> 


in 

CD 


CD 


<  O 


co  o 


cm  o 


-  O 


cn 


o  o  o 


o  o  o 


O  CD  O 

co 


oo  00  CD 
■>“  CD 
CD  00  't 


00 


o 

3 

Q 

LU 

DO 


CD  CD 

0) 


s 

CL 

_l 

< 

o 

< 

o 

H— 

T” 

CM 

CO 

t— 

z 

CM 

00 

1 

00 

1- 

in 

LU 

> 

LU 

o. 

LU 

2 

DC 

o 

1“ 

o 

in 

in 

> 

<J) 

D. 

CD 

CO 

in 

y— 

CM 

a 

- — 

LU 

< 

co 

T— 

CD 

LU 

CM 

H 

DC 

> 

i — 

in 

LU 

1 

Cl 

CO 

O 

DC 

t- 

UJ 

uj 

LU 

H 

S 

CD 

in 

r- 

a 

2 

< 

1 

o 

l-H 

00 

CD 

CL 

t—t 

> 

h- 

3 

_J 

SC 

CD 

# 

DC 

* 

O 

* 

h- 

a 

LU 

Q 

LU 

O 

LU 

Q 

LU 

K 

LU 

DC 

a 

f- 

DC 

CL 

CM 

DC 

CL 

DC 

Q. 

in 

> 

z 

< 

> 

< 

> 

< 

> 

< 

> 

in 

o 

i— 

o 

H 

a 

1- 

O 

1- 

2 

t- 

< 

cn 

a 

LU 

H 

s 

o 

• 

o 

o 

o 

* 

o 

DC 

o 

■v- 

QC 

O 

CM 

DC 

O 

n 

DC 

O 

< 

* 

00 

< 

z 

< 

z 

< 

z 

< 

z 

# 

o 

o 

O 

(J 

o 

o  o  o 


o  o 

QC  Z  in  CD  C~ 

< 

o 


^^ooooooooooooo 


CD 

< 

H-  LU 

in  cd 

20000000000000 

< 

X 

o 


CD 


^ooooooooooooo 


in 

DC 

in  o 

H 

CL  LU 

LU 

X 

2 

lu  m  O 

■*- 

o 

o  o  o 

CM  CM  CD 

t-H  O 

1 — 

CD 

■*“ 

CD 

in 

in 

s 

in  a 

CD  00  < 

LU 

o 

£ 

UJ 

in 

t— i 

CD 

D. 

1- 

< 

UJ 

1- 

LU 

o 

(— 

in 

CD 

LU  O 

CO 

o 

in  CD  o 

o  o  o 

LU 

z  o 

X 

CD 

CD 

< 

in  cj 

in  z 

< 

X 

CL 

>  M 

1- 

l J 

LU 

<  w 

cn 

—1 

DC  1- 

UJ 

<  z 

O 

o  cn 

s 

z 

X  p-t  o 

UJ 

CO 

o 

>  co  O 

o  o  o 

3 

ti  o 

QC 

cn 

CO 

< 

2 

<■ 

5 

a 

*— i 

(—  _J 

t-H 

5 

DC  UJ 

z 

LU 

t-H 

1- 

O  O 

cn  • 

t-H 

CD 

in 

H 

cn 

X 

LU  • 

< 

N 

CL 

i-h 

in 

z  • 

h- 

LU 

o 

_i 

DC 

t-H  - 

in 

CD 

t- 

00 

▼“ 

a  t"  o 

_J  • 

O  CD  O 

a 

Z  O 

• 

<■ 

DC  u. 

CL  • 

z 

< 

"D 

LU 

UJ 

o 

o  • 

CO 

< 

X 

CD 

N 

LU 

1-  • 

CD 

t— t 

> 

in  • 

+  1- 

in 

l- 

in 

H-  < 

O 

i 

>  _l 

Q  • 

IU 

x  in 

1- 

CL 

1—  < 

LU  • 

X 

z 

CD  *-h  *- 

CD 

LU 

T“ 

-1  Z  CD  O 

QC  t- 

CO  00  CO 

t-H 

-<  o 

m  Z3 

< 

l- 

1 

<  LU 

<  LU 

CD  >  in 

co 

s 

LU  o 

cn 

in 

Z  CL 

X  cn 

<  00  CD 

UJ 

LU 

LU 

in 

UJ 

o 

0- 

a 

LU 

CD 

o 

00 

0- 

CD  z 

CD 

< 

z 

s 

O 

z  o 

Z 

1- 

LU 

CD  O 

i— i 

Q.  1- 

M  CD 

< 

in 

CD 

<  Z  CO 

r- 

_j 

■*— 

o  in  in  O 

>  LU 

CM  CM  CM 

X 

z  o 

— 1  LU 

LU 

CD 

CD 

H 

<  in 

CD  >  in 

CD 

< 

O 

in 

X 

<  00  CD 

X 

_l 

o'*- 

CD 

i— i 

in 

LU 

H 

X 

LU 

sc 

CD 

1“ 

cn 

o 

z 

< 

CD  DC 

i-h 

*-H 

1- 

z 

<  <  CM 

_i 

CD 

r- 

<  CD 

_J  • 

O  O  O 

tn 

l-H  l£) 

-I  l- 

00 

Z  CD 

CM 

S  CM 

CD 

< 

I—  LU 

cn  CD 

20000000000000 

< 

X 

Q 


i-iOOOOOOOOOOOOO 


CM 


co 


co  co 


co 


LU 
..  CD 

in  < 

DhlU 
DC  in  CD 

<  zomoOOincDinininininin 

CD  <CM-t~C'JCMCM't~'t~'t_'*—  'r~ 

X 

o 


O 

o 


O  CD 

CD 

t-H 

CD 

O  CM 

CD 

m 

y— 

s. 

CM 

■*-  CM 

CO 

00 

UJ 

CD 

< 

h- 

LU 

cn 

CD 

CO 

CO 

00 

z 

O 

0 

0 

t- 

co 

CD 

in 

< 

LU 

CO 

00 

X 

in 

CD 

K 

cn 

DC 

l-H 

CM 

CM 

CM 

LU 

in 

in 

LL 

CO 

CD 

in 

Q 

o 

CD 

00  00 

<• 

00 

co 

O 

z 

z 

Q  UJ 

o 

LU 

dc  a 

t" 

f- 

t" 

DC 

a 

CM 

CM  CM 

<  > 

< 

> 

CD  1- 

u 

i- 

cocMCMinr-OcocM 


OOOOOOOOOOOOO 


2  O 

inoOOOOOOOOOOOO 
a  — 
cn  x 


>0000000000000 

<  -  o  oo  oo  o 

-ix  in  inin  inin  in 

LU  • 

O  I- 


i-SioiOOOcMOOOMnO 

<  o  CD  >  cor-r- 

tn  —I  CM  <-  CM  CO  <  CO  coco-^- 

U-  <  CO  -•-  <  CO  <  CM  CO  CM 


--■'--'-O’-oo--- 


aooo(DOT*cM(ooinccr-coa)0 

t—  h—  h—  t—  t—  h—  t—  h— 

o 


0.  -I 

O  < 

I—  z 

in  lu 

a 


HHOOOOOOnoOiono 

ZCD’-OOCDOCDO'aiOlCO'tO 

HZhtnincoinncMioncMCMin 

—I  LU 


CD 

<000000000000 


o 

z 

LU 

Z  UJ 

lu  CD 

LU  <000000000000 

DC  h- 

CD  in 

< 

t—  o 

<  z 

Q  O  CD 

O  <000000000000 

LU  —I 

D  in  I- 
lu  cn 

x  < 

►H  »- 

lu  in  uj 

CD 

<000000000000 

h- 

..  m 

in 

a 

a 

< 

O  CD 

<000000000000 

—I 

sc 

Z  D 

•■H  z 

—I  LU 

Z  UJ 

lu  a 

LU  <"-CM’-CMOCMCMOO'-CM-- 

cc  I- 

CD  in 


in  CD 

dc  <ininoinominooininin 


oc 

< 

f- 

in  lu 
CD 

<CM^-CN’-0-^'-00CM’-CM 

h- 

in 


I-  UJ 

►-iQininininoininoo*-*-*- 

X  O  CD  CD  CD  (D  CO  CO  00  00  00 


SC  ••'-CMCO<COCM<OOCD’-CMCn 
zoininininininininin’-^T- 
•-iZCDCDCDCDCDOOOOCOOOOOOOOO 


Q  LU 

<>CDCOCOCOCOCDCOCOCOCOCOCO 
a  t— 


QCO"-CMCO<inU>t'~COCDO’-CM 

<ZCMCMCMCMCMCMCMCMCMCOCOCO 

O 


BIJOql V  J°  XllSJOAIUfl 


J 


' 


ooooooooooooooooooooooo  o  o  ooooooooooooooooooooooooooo 


0o00oo°o00oBo00oo800o00oo0o00o0o000000o00*000-000°00 

in  in  in  in  in  in  in  in  in  in  in  m  in  in  inin 


in 


O 

in 


O 

in 


o 

in 


—  O' - 

OnOn 

P)  --  CO 


aiKioiOOm'tinifiOOintnoooooooooooinOint 
*r  co  r~  co  id  co  o  in  r-  o  in  ■*-  o  O’  ©  in  O’  co  ■<-  m 

OnOO)  cn-^’-  in  <•  t-  co  in  cm  OOO’- 


m  ’t_  cm 


co  cm  co 


CO  CO  rf  CM 


OOOinoOinoinmincoinincocoininioincMinio 
■o-incoininoocoOToo^ai’-m^coin'O-'-oo'^io 
cMincoinincop'OcooiDcooc'incocMOOioOin 

CM’-'^-^CO-^CMCMCO’-COCMCMCMCMCM 


CM  <  CM  O  t-  *-  v-  y-  -r- 


O'fO'T^^ifi'JOcJ^^oiO'fiN’j'jiooiiM-in^'tNMinoicMOOcooocoooOinwoiin'fcocMTrcMOcM^cM 

OOOO'O'OCO'OOCMO-O'CMOO'CMCOO-COCMCOO'COO-O'COCMCOCMCNOOCOmOCOWOOCDCMOJCOO'r^CMCOCMOCMCOCM 

inCMinCMCMCMCMCMin-^CMCM’-incM’-CMCMCM’-CMCMCMCMCMCM-^CM-^-'-ininCMTrincMO-in'O-CN-^’-CMCM-^-'-CM-^in-'-CM-^ 


oooooooooooooooooooooooooooooooooooooooooooooooooooo 


OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 


oooooooooooooooooooooooooooooooooooooooooooooooooooo 


oooooooooooooooooooooooooooooooooooooooooooooooooooo 


OOOOOOOOOOOOOOOOOOOOOcmOOOOOOOOOOOOcmOOOOOOOOOOOOOOOOO 


’-CM’-CMOO’“CM'-CMOOCMC0CMO,l'CMC0CM'0'’-'r-OO,-CM’-CMOC0CMC0CM’--^CN’-CM-^CMCM’-CM'^CM’-CM’-CM'>-CM 


ininininoOininininOOcoininoininincoinininoOininininOininincoininninininininininininininLnininin 


M-CM-OOCM-CM-OO-CMC0OCM^CM-CM^CMOOCM-CM-OCMC0CM-C0CM-CM-CM--CM-CM-CM-CM-CM- 


’"CMCOtj-oOCO'^'CMCO 

NSSM>.^CJ)0)0) 

®K>COCOCOOOCOOOCO 


'3-ooa)CMco^-co'-cMco^ininr'i»OT^^co^oo^^”^^^“^^”^^l”2a,2SSinSSS 


330 


—IluOOOOOO 
iu  £ 

>  M 

<  l— 
cc 


3000000 

O 


QC¥  -OOOOOO 
H  2  O 
2  m  z 


-iiuOOOOOin 
iu  s  o 

>  m 
<  f- 
K 


3  O  O  O  O  O  oo 
O  — 


o 

>- 

DC 

l— 

z 

LU 


¥  •  O  O  O  O  O 
20  in 

m2  O) 


< 

o 


3 

O 


jLutnOOinom 

UJ  S  O  Tf 

>  M 
<  h- 

a 


3  CO 

o  o 

_)  CM 


o  o 


00 


> 

a 


l/)  LU 

O 

oc 
< 
o 


SC  • 
2  O 
2 


O  < 
in 
00 


O 

ID 

O 


O  CM 

in 

0) 


sc 


> 


-iiuOOOOOin 
iu  s  < 

>  m 

<  h- 

ne 


3  0  0  0  0  0 
o 


sc  ■  o  o  o  o  o  co 
2  0  in 

M2  0) 


s 

QC3000000 
o  o 

LL.  _j 
M  LU 
2 
o 


3  00  CO  M  o 
O  'T  CD  co  in  CM 

j  cm  o  ■»-  in  or 


,_,_,nf_m(TiOT-cMC0rriniDis-000)O'r"CMC0^riniDC' 
JOf'©0)0'-cMCOTriniDr-coCT)0'-cMCO'd-iniDr^ooa)0’-^f2^g^  “tp(^r^t^t^r^l>.t~.r>r-i^oocoe0ooooooo0oo 

nncocoo-o-o-'oo-'O'OO-o-'OininintnininininininiDiDiDiDiDiDiDU’^'i-' 


o  u. 


•  ■>-  cm  co  •o-  oo  CM 

o  in  in  in  in  in  in 

2  ©  ©  ©  O)  0)  co 


QCQ.CMCMCMCMCMCM 

<>rocococococo 
O  H 


o  • 

aoeociO’-cMn 

<200000)0)05© 

o 


J 


tnjoqiv  J°  Xiis-ioAiufl 


. 


■  9 


X 


500000000000000000000000000000000000000000 

CO 

CM 


331 

ooooooooooooooooo 


5000000000000000000000^ 


oooooooooooooooooooooooooooooooooooo 


) 


OOOOOOOOOOOOOOOOOOOOOCJ) 


CD 

CO 


OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 


OOOOOOOlDOOOOOitiOOOOtti 
^  -o-  n  rt  *3-  co  ■sr  co 


OOOOOOOOOOO 

'T  rr 


OOifiOOOOOOOOOOOOOOinOOOOOOOifiOO 
~  co  ’3-  ’T  co 


0>OOOOOOr-OmoOC0C0OC0OO’-O'-OinOOOOOOOO’3-0> 
O'-  oj’-  t-  co  in  co  to  cnioo 


OOOOOt-cMOOOOOcocMO’-inoOcocMOcotDO 
CO’-  O  coco’-o—  in  m  co  r- 

CM  -r-  — 


coOOCoOOO’-OcoOO'T’-OcoOO’- 
co  r-  ’-a)  cor-’-  a) 

co  co  coco  oi  co  o  oo 


OrO^OOnOCOOO^DOOOON 
CD  CD  CO  CD  CD  i- 

’f  r-  ^  ip  ’ t  oo 


nowooOcMnt-NnoonnO’-dO 

CO  t-  05’-C0’-CD  CD  in  CD  CO 

05  CO  COCDO)05f-  ’TCD  t^’T 


OidOOciOO 
co  cm  o 
oo 

CM  CM 


O  O  CO  o  O 
V  CM  O  M- 
CD  CO 
CM  CM 


in  o 

CO 


O  cm  O  in 
1  CM  o  CO 
^  00 
CM  CM 


O  O  O  O 
"3-  O  rr 
co 

CM 


OOOinOcMOOinooOOOOOOOOOinOOinoOOinOOOinoO 
^-’3-co  cm  o  ”3-  co  o  ’i-'tf  co’f’i-co'T’3-  co’j-’?  co 

CD  CO  CO 

CM  CM  CM 


OffiO'JCO'jOnOtDiO'j 
■<-  r-C0’-  co  oco'- 

^r  in  cm  id 


O'-OCMCD^-^-O05CDC0 
CO  CM  CDCO’-tD  ’-coco 
CM  CD  -r-  CD  CO 


OOcotoOcDOr-tMOO 

CD  CDCM’d-  CO’-CMr- 
05  CD  CM  CM  r- 


CDOOt—  COO’-  05OCDC0 
CO  CO  ’-  CO  ’-  CM  CM 

--  CM  CM 


OC0C0CMOCMG5’3"O00f—  O 
Or-’TO  cococo  cm  r- 
in  in  co  in  ’j-  cm  id 


OCMO’TCOCOOCMO^CO 
in  r-  in  in  ’-  co 

co  oo  co  co  co  oo  oo 


Ol’-CMO’TOOOlCMO^lO’- 
’-coc-  ’-r-r-ai  cdcocd 
co  05  co  0)  co  oo  oo  <3-  co  r- 


CMO^’-lMOCOffl’-CMOO 
■*“  OOCD’-  ’-’-incD 

05  ’d-t-'O)  0)  O)  ID  ^ 


co  OOn<r  o  co  ^  o  cm  n 

CD  ’-CO  ’-CO  CO  O) 

T  00  05  CO  05  CO  00 


'TCMCOMOCMCOOOCMCOO 
'-CO’-CD  '-coin  ID  00 
CD  05  05  r-  CD  CD  r-’T 


oooooooinoooooinooooinooooinooooooooooooooooooooinooinooomoooinoo 

Mf  TT  CO  CO  CO  *3  CO’?  ’T'a-’J-CO’tCO’C’TCO’J-’TCO’T 


0lOOc0OOOinOcMOOO’J-OOOO00O’-OO0)OOOOOOO,crOOOOOOOc0OcMc0OC0’j-Or-O)OOr-'-00OcDinO 
cn  coco  cn  (£>  r-  ld  ^  ■*-  ^  okdip  ncoin  no 


JOOO’-OOOnO’-OOOtoOOOOCoO-OOnO’-OOOOOcMOOOOOOO-O'J-oncrOn'f’-Oiocr’-OnMfO 
CO  h-  f-  (J)  Q)  cp  -r-  CO  if)  CO  **”  CO  COCF)  CO  ■*”  CD  ,r~  cd  lo  cd  oo 

00  00  00  00  CO  CO^  Q)  ^  if)  G)COOCOCOOO)t^i D  CD 


OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 


r-cO’tr-tD’jinincDcocD'O-co’- 
^OOcoco’-05’crrr’-co'^r-’- 
m  co  m  in  cm  cd  ’-cm 


cD'^rcD’rcoincoor-incor-'O-O)’- 

OOco’-cM’-coin’tcMcoincM’jco 

’-r-  co’-oo  Tf05’jr-CMCM’- 


CDOCM'3-CMinO'-O’-CX5COC0r- 
C0-—  ’S-’TCOCO’tf'—  "3-inCDOCD^- 
’-05’—  r-  ^  CO  CM  CO 


cM’-cMCMCDincMCD’f05inr-r-r-CD 
cMr-r-’-cMr-’-Or-’T’-O’tCDCo 
co  •^r-’-inooinin^-cMCD’-co 


"CMCO’3COO)’-CMCO 

^■’■’■’■’-’-r-r-r- 

■OCOCOCOOOCOCOCOOO 


’rCOOJ’-CMCO’TOOOOCM 

r-t--r-0)0505050)05’- 

COCOCOCOOOCOOOCOC005 


CO’J-OO’-CMCO’TinCDI-- 

T-’-’-cpcpCDCDCDCDCD 

0)050)'?’3-’J,;T'^’3-’r 


OOO’-CMCO’TOO’—  CMCO 
CDCDCOOOOOOOOOCOCOCO 
’f’J-’t’S-^-^-'^-COCOCO 


’J-CDr-OO’-CMCO’J’CM 
COCOCOCOCOCOCOCO’- 
COOOCOCOO)05  05  05CD 


CO’T’-CMCO’T’-CMCO’r 

’-’-CDCDCDCDinininin 

CD(Dr-f-r-t-(DCDCDCD 


^CMCMCMCMCMCMCM 

^ococococococo 


CMCMCMCMCMCMCMCM 

cocococococococo 


CMCMCMCMCMCMCMCM 

CDCOCOCDCDCDCOCO 


CMCMCMCMCMCMCNCMCM 

cococococococococo 


CMCMCMCMCMCMCMCM 

cocococococococo 


CMCMCMCMCMCMCMCM 

COCOCOCOCOCOCOCO 


CMCMCMCMCMCMCMCMCM 

COCOCOCOCOCOCOCOCO 


_®0)0’-cMCO’3-iniDr-co 

wicnoooooooooo 


cnO’-cMCO’Tin(Dr-coo)0’-cMCOTrincDi^co050^-cMco^; 

g^f^^ll^lt-i-U-P-T-CMCMCMINCMIMCMCMCMCMCOCOCOCOn 


iniDr-cocDO’-cMco’TiniDr- 

COCOCOCOCOrr’J-’T’t’J’t’T’r 


CO  05  O  CM  CO  TJ 

n-  in  in  in  in  in 


EiJsqtv  J°  XiisjsAiun 


’ 


X 


INITIAL  SETTINGS 


332 


D  O  <J 

02m 

*"H  LU  (/) 

O'  w 


SrnSrnlSMOmNOOOOONONO0:iOmo',o'!fO,O't'r'I^lII'flC 
id  co  id  co  id  co  to  id  id  id  to  in  in  in 


in 


in 


in  in  in  id  cm  id  cm 


LU  O'  u 
LU  <  UJ 
Cl  I-  LO 

co  in  w 


mi3™r°£r’£‘'-''-inLr>inininini^inroinc,3tf)ff>tficiino)inoiininin-'-oi-'-co 
n  n  ^  mo  id  id  id  id  in  in  in  in  n  id  n 


i-  < 

M  z 

x  o 

LU  I-H 

in 


<oio(otoiDioioiDcococx)oooaoo-^’---ininininiDtoioiD'-'-'^-^--^^rocnnco 

’T''3''sr,3’,3-^fTj'sTTt*3-TT'<3-T3-"q-tDlDlDlDlDlDlDr-r^t,"f'~COOOCOOOOOCOOOOOOOCO 


^  LU  ^ 

OOI 

<  LU  LU 

m  D  > 
o  w 
X. 

< 


’-cnooiniD’-oiocNincMr^in'^rocoTj-in 


rtniDtD^^noiOincMCNOt'Oin 
i-  t-  i-  CM  CM  CM 


2  U 

cc  in  lu 
o  cl  in 
ilO\ 
H  I —  X 
z  in  lu 
x>  > 


cnnOcMromntNOin'Tincoon'f-iDin'-otDCMNTi-rotDiDnooOtDNmDiD 

oioocomoioi'*ti'~oir'-int''Co^rcMoocMt-~cococooocot''CDOiinoocooocDiniDcoi'- 

cM’-O’-cDh-cN’-Ocn'TcncoOin^^'tiD'^-'TooiD'^-ininincMiO'-OOco-^^- 

■^CM^'^000000'^0000000000---0’-0--cM-^00000’-0 

ooooooooooooooooooooooooooooooooooo 


UJ 

CO 

<  r- 

I- 

tn 


d 

<  10 


in 


LU 

CO 

<  in 

f- 

cn 


d 

< 

K 

tn 


d 

<  co 
»- 
in 


LU 

d 

<  CM 
I- 

in 


d 

< 

K 

in 

on 

LU 
DC  d 
UJ  < 
00  (- 
S  in 
23 

Z  U. 

O 


LU 

D  O 

O  Z 

z 


CO 

CO 


o 

CO 


CM 

CO 


f- 

CO 


lDO’-a)hM0OOCJ)'tC0O 

'•“COCOCMCMCM-'-COCOCMCMCOCO 


OOOOOOOOOOOOO 


s 

>  — . 

co 

-3  O  in 

t"  •O' 

O  in 

o 

< 

X 

in 

CM  CO  CM 

•r-  CO 

-  o 

o 

_j 

0) 

▼-  T-  T- 

O  r- 

o  o 

z 

LU 

I 

< 

o 

LU 

oooooooo 

DC 

> 

w 

•s. 

X 

DC 

>  \ 

T- 

<3  co  in 

id  O  O  in 

O 

< 

X 

V- 

00  N-  01 

in  oi 

01  CM 

Li_ 

-J 

CM  o  CD  O  CO 

CM  t- 

t— » 

LU 

X 

Z 

o 

LU 

5 

3 

3 

CM  **- 

O  O 

D 

> 

w 

LU 

i- 

X 

\ 

CO 

ID  CO  01 

M  0)  O  'T 

z 

X 

00 

in  O  cm 

oo  in 

O  ID 

hH 

LU 

CM 

00  CM 

co  co 

CO  l" 

1- 

D. 

X 

in 

LU 

oo 

■r-  CO  ID 

co  or 

0 

0 

> 

w 

LU 

o 

X 

o 

LU 

O  O  to  in 

CM  ID 

00  00 

z 

_J 

£ 

10 

r-  —  co 

or  t" 

r-  r- 

< 

-J 

¥ 

1— 

LU 

in  co  cm 

CM  O 

O  oo 

on  > 

I 

O 

CM  O  01 

m  id 

CO 

H-t 

< 

LU 

v— 

CM  •*- 

a 

o; 

> 

l- 

LU 

V- 

LU 

< 

OZ 

in 

CO 

O’-Otoo 

CO  o 

d 

\o 

00 

in  in  in 

CM  00 

in 

LU 

LU 

o 

o 

(/) 

in 

3i 

X 

o 

o  o  o  o  o 

O  CM 

»— 

o  \ 

in 

o  ^ 

oi  in 

or  ID 

< 

_l 

X 

in 

Tt  T-  CO 

r-~  in 

CM  *3- 

in 

LU 

LU 

co  co  n 

CM  •*- 

lOco-'-iniO’-cotnr-co-'-coin 

-T'sriDiDt'-ccoocooooooioioi 


o: 

^  LU 

Z  oo 
►H  s 
_l  23 


)TrcMincMiDioio^Of^cMiniDcnC'OiDO’-^,i’OcM'5i-cN 
JinCMCMO'O'LnCMiniD^r’-'^CMCO'O-COCO'^’CM'^OOC'OlO 
>OOOO(0OO0OOO'?rr-^oin'0-'^OOOO-^-K)O 

ooooooooooooooooododdoooocoooooo 


oirroiin-'-oi<Doioococot~-inoininoi'i-r''CMaiiD'3-iDf'-OiD 

10TCOO'r',-tDOOC0CIC0roc0iniDCJ)MtOMinC0C0'TlO00O 

OcooococMOco-^inco’-inin'o-incocototorrcM'-oOioiO'- 

O’"OO’"OO’'O,',','Oin’-oiOMO(0’-OOO'rtN’- 


iD'^cor^c-incMCMt^r^cocMooiO’-incMinr'COCD'-OtoO’- 

cc’-oocMcocn'O-cO'crcocooocooo'^'-cocooocoinio'o-^O 

0T5',^'OOlOCOO)C'CMinCMCOt^COT”OCOCM 


noiOinnincM^raco^oOO’-iD 


<TiD-'-0<Dooin-'-oiinoiiDOi'3-On-tD'3-t'~Ocor^*rinoo 

cMCOin-'-d'O-cO’-'O-co 

CO  CO  00  00  "3  CM  O 


'crrr'Q-C'CMincoojinco 

--  t-  --  CO  CM  -- 


O  in 
cm  o 

CM 


cMinTr^'-^in'O-'TCMincM 

incoc'r~r'CMr^c~  inco 


in 

O  in  o 
co  in  co  oi 


1/1 

_i 

ID 

ID 

01 

in 

CM 

LD 

u> 

0) 

in 

LO 

<X> 

r- 

in 

o 

ID 

CM 

CM 

o 

o 

in 

CD 

T- 

in 

r— 

CO 

T- 

ID 

*T" 

01 

in 

CO 

t>- 

h- 

r^ 

■T- 

in 

0) 

CO 

o 

r- 

o 

ID 

o 

U> 

LD 

CO 

CM 

o 

CD 

CO 

■*- 

03 

co 

CO 

CM 

in 

co 

■*- 

CM 

CM 

CM 

CM 

CM 

CM 

CO 

CO 

CM 

CM 

CO 

CM 

CD 

3: 

X 

r~  in 

O 

X 

or  cm 

_l 

X 

or  oi 

•3CMCMCMCMCMCOCMCMCMCOCMCM 

LU 

LU 

> 

CD 

h- 

co 

u> 

O  CM 

*r 

r\l 

in 

o 

ID 

in 

CM 

c- 

f- 

CD 

LD 

CM 

CD 

CO 

f- 

CO 

CO 

CM 

t-~ 

O 

CM 

CM 

CD 

T— 

t" 

!*• 

in 

CM 

iD 

^•OlinNOO'fMD't’-O’- 
r^^’-r-OOtoco’-’-TTin 
in  in  in  id  in  in  <3 


-CMCOO-iniDC'COOl-lMCOrroOCMCOO-’-lMCOrr^rMCO^-CMCOTJ-COCn’-CMCO 

^^^^^^^-!£.=rMr£ri-^’0-ioioioioioio<ot''r-r-'t-cococococooococDcc 


Ejjsqiv  XiiSJ3Aiun 


834  168  1550  39  82.32  3.226 


'T  ^ 


333 


DQU 

OZiu 

HUlfl 

a 

UJ 

0. 


CMOiDOOOOOOOOOOOcoOcocococort 

CM  ID  ID  ID  ID  CD  CD  CD  CD  in  S  S  S  “  ^ 


00  CO  o  CD  o  CD 
"cr  cd  cd 


o  o  o  o  o 

CD  CD  CD 


zt"- 
uj  cl  o 

UJ  <  UJ 

a.  i-  in 

0  C/5  W 


O’-coininininininin 

CD  CO  CD  CD 


inininioincoininincocoOTco’-in 

cd  cd  id  p-  r-. 


in  in  in  o  in  in 

id  r- 


in  cl 

UJ  LU 

in  i 

X)  p- 

ca  o 


_i 

i-  <  nn 

m  z  oo  oo 

x  o 


co  in  in  in  in  p~ 
oo  oo  oo  co  oo  co 


p~  p-  Is-  p>  r-  o 
oo  oo  oo  oo  oo  oo 


0)0)05  0)0)’“ 
00  00  CO  CO  00  O) 


^  ^  n  n  n 
0)  05  0)  0)  05  05 


n  in  in  in  in  in 

0)  0)  0)  05  05  05 


a 

X 

o 

«*- 

CD 

LU 

\ 

o 

LU 

2 

Q. 

y 

CO 

n 

0) 

Ul 

CM 

CM 

UJ  l-H 
1/5 


¥  Ul  ^ 

<25  r-'niDin'q-inincMCO’-p-coco’tiDCMiniDiDincMr-incoco’-’-TrcocMinco 

00  D  > 

O  w 

X 

< 

z 


LU 

O 

z 

<  X 

0) 

,3’ 

rr 

2  LU 

0) 

T- 

C30 

DC  o 

O  Z 

00 

co 

o 

LU  HH 

T— 

CL 

LU 

Q. 

2  U 

a  in  lu 
o  a  in 
u  o  \ 

H|-I 
2  1/5  UJ 
D  > 


0)inp~’tcoiniDr^coi^'fiDiDcoinr~cMiD’T''tP~cococo’tp-’-iD’tcoco’t 

SStf^C^5Si)n',-r'’-O'3'c0CN|r;'’-OtncN|00OnO)CM'-’3-’TnCD'- 

OOO’-OOOO’-OOOOO’-OOOO^OOOOOOOO^-OOO 

oooooooodooooooooooooooooooooooo 


2  U 


— i  on  in  lu 

P- 

CN 

in 

<  o  cu  in 

CD 

in 

HU.O\ 

• 

O  *— *  h—  X 

in 

o 

in 

i-  z  in  lu 
D  > 


I 

2  >  \ 

O  <  X 
O  _J 
2  UJ  I 
<  D  UJ 

a  > 


’t’-GJCMCMP-CO’tQOOP- 

innoooi’-OO'JOOcN 

OOOCMOOOOCMOO 


"-OOOOOOOOOO 


IDCMGSCMP-COIDCMO)’? 

OOcO’-’TinOO’-’- 

OO’-NOOOOt'O 


OOOOOOOOOO 


cor~cocoo5P~iD'tcO’-in 

r'CMCMn^rO’-’-O’-O 

OOcmcoOOO’-OOO 


OOOOOOOOOOO 


2  I 

cl  >  \ 
o  <  I 
u  _J 

H  UJ  I 
2  D  UJ 
X  > 


0)p~r^^rcoiDcMP-p'p'CMcocoininin’-a5CMP'0)cor~iDCMa5’ta)cocMO)0 

iDP'0'cra)r'^riD05005ninoot^oCDnn’-r'CMninoncMDCM'-no 

inr'’-0)0'OOCDr-nn’-Of~c0f~^’-OcMr-’j’-oOincM05’-0)0)’- 


cMOcMCMOOOOcMO”-OO’-C0OOOO’tO’-O’-’-OOOcMOOO 


I 

Ul  5-  \ 

Z  Z  X 

►H  Ul 
HO.  X 
in  lu 
> 


nooi"-ooocMinino)’ff'00)oii^OMnnnw^o)’-^o)Mnrnn 

cMiD'Tin'T'T’T’-cD’-inai^ojoiincDODiflOi’-oococM'-coronooo 

«DCO’tin’-’-cMp--iDCO’~r'-’-a5inp~(DcO’-inf~iDCOcMP~0’toocMOiD’- 


ncMiinn’f’-OO’-OinOOwwOcMOOOiOcDO’-O'-’-Mcj’-inO 


UJ  d  x 

O  IU\ 

Z  JS 
<  J  y 

H-  LU 

w  >  I 

M  <  Ul 
O  DC  > 


o 

co 

0) 

t— 

CD 

O  oo 

O  t- 

co 

CM 

m 

00  O  0) 

00 

CM 

CM  O  H 

OOO) 

CM 

ID 

co  O  O 

co  o 

in 

O 

O  ’St 

in 

O  in 

CD 

O  co 

c- 

O  in 

rr 

-OH 

0) 

CN 

O  in 

in 

’t  O 

CM 

o 

CO 

in 

CO 

co  05 

co 

CO 

O 

in 

co  in 

00 

co 

CN 

ID  ""  00 

CD 

o 

CD  ’“ 

in 

05  in 

in 

CD 

P- 

in 

co 

•p- 

O 

CM  ’t 

O) 

in  oo 

id  m 

o 

CP  CN 

in 

p-  co 

in 

O  CM 

in 

co 

CN 

CM 

0) 

--  in 

CM 

X 


_J 

2 

>  \ 

CD 

< 

O 

<  i 

O 

o 

t- 

a 

_ j 

CO 

O 

z 

LU  X 

»- 

< 

Q  LU 

o 

6 

o 

CL 

> 

w 

2 

X 

OC 

>  \ 

CO 

< 

o 

<  I 

in 

T- 

1- 

LU 

—I 

r- 

o 

r- 

o 

h-l 

uj  X 

I- 

z 

□  Ul 

co 

CN 

X 

> 

o 

O 

y~ 

X 

—1 

LU 

H  \ 

in 

r^ 

00 

< 

s 

Z  X 

•»- 

co 

H 

UJ 

n 

co 

O 

H 

Q-  I 

1- 

in  lu 

▼- 

in 

in 

> 

in 

’t 

CM 

CM 

LU 

a  x 

U 

UJ  \ 

00 

in 

CM 

_J 

z 

-1  s 

CM 

0) 

< 

< 

_i  y 

r- 

1- 

ID 

CM 

00 

CO 

o 

in  >  x 

P- 

CO 

1- 

►— < 

<  LU 

CM 

T- 

D 

O'  > 

p* 

UJ  (- 
UJ  < 

cl  in  ^ 

O  sd 

111  Lu  w 

o  o 


'JOininoiininrfO) 

oon^iD’-iDiDnin 


r-coo)0)t^ 
cm  in  in  in 


OincoOOO)'- 
id  n  n  CD  CD  1"  CM 


CM  05  O  P*  ID 
rf  P>  ID  CD  n 


CD 


n  05  in  o)  05 
cm  "t  "t  ■■-  ■o- 


<  _J  x 
in  u.  lu 
> 


in 

-j 

in 

_l 

-J 

in 

_l 

-I 

in 

_j 

Ul 

-J 

o 

in 

o 

CM 

o 

CN 

CM 

in 

co 

in 

0) 

CM 

CN 

in 

in 

Ln 

CM 

CM 

in 

LO 

o 

CM 

in 

in 

in 

CO 

CN 

O 

O 

CN 

in 

in 

0) 

t*- 

LO 

in 

00 

co 

p> 

P> 

r- 

00 

ID 

co 

’J 

05 

CD 

in 

▼- 

o 

»“ 

co 

0) 

co 

r7 

0) 

r- 

^r 

in 

in 

co 

n 

00 

00 

O 

co 

O 

CO 

00 

00 

O 

CO 

O 

CT) 

00 

00 

CM 

0) 

O 

co 

O 

CP 

CN 

CN 

CO 

0) 

CM 

CO 

CO 

CO 

f- 

CO 

T— 

CM 

CO 

CN 

CO 

’- 

T* 

CO 

CO 

X 

CO 

CO 

o 

ID 

■<■  in 

o 

\ 

O 

ID 

■q- 

CN 

rr 

CO 

”-  0) 

-J 

i 

CO 

CM 

CO 

in 

IL 

UJ 

> 


in 

CP 

CO 

ID 

t  CO 

-T- 

ID 

’f 

(0 

’t  00 

CO 

■r- 

T— 

o 

o 

co 

»-  CM 

CM 

ID 

CN 

** 

CO 

in 

CO 

o 

CM 

T- 

CM 

CN 

CO 

CO  ’“ 

p« 

O 

03 

in 

CM 

P- 

P- 

y~ 

^t 

ID  ’" 

CO 

in 

CO 

■>- 

ID 

CM 

o  -- 

in 

cl 
y  ui 
2  00 
•1  2 
-I  O 
2 


cd  p~ 
n  n 
co  oo 


co  CM 
n  in 
co  oo 


* 

n  oo 
in  in 
co  oo 


# 

0) 

in  p~ 
oo  co 


cm  n 
p*  r- 
00  00 


* 

"?  CO 
r-  r- 
oo  oo 


* 

0) 

P-  0) 
00  00 


*  * 

CM  CO  T  00  0)  CM 
0)  05  05  05  0)’- 
CO  00  00  00  OO  O) 


* 

n  rr  oo  "-  cm  n 

t-  n  n  n 

05  0)  0)  0)  0)  0) 


rf  t-  cm  n  ^  co 
n  in  in  in  in  in 

0)  05  0)  0)  0)  0) 


a  lu  in 

m  o  x 
D  z 
in  •  m 


lu  O-l 

o  lu  z 
z 


in  t-  in 
OOU.UJ 
O  O  M 

oc  oc 
oo  •  (- 
o  o  z 
in  z  ui 


z 

ui  ui  I—  O 
2  O  CL  CL 
M  Z  < 


in  in  o 


r) 

oo 


re 

re 

re 

re 


EJJOqtV  P  XlTSJOAlUfl 


CPU  TIME  USED  SO  FAR  IS  0.53  SECS 


*• 

INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO  FAR 


334 


00 

DC 

LU 

HI 

CO 

X 

D 

H 

CQ 

O 

o 

o 

CO 

c- 

ro 

T“ 

-r-’ 

CM 

CO 

CO 

CD 

CD 

o 

CD 

O) 

p- 

^T 

If) 

CO 

O 

0) 

CO 

CM 

h* 

o 

.07 

LO 

o 

in 

■r- 

CD 

T~ 

O 

O 

CO 

O 

o 

o 

CO 

o 

CO 

TJ- 

00 

CD 

CD 

CD 

CM 

CD 

o 

CD 

t" 

t" 

o 

o 

CM 

If) 

TT 

o 

t- 

If) 

CM 

CM 

CM 

CM 

CM 

CO 

in 

CM 

T“ 

CM 

CD 

CM 

CO 

CO 

t- 

f- 

CO 

CM 

t*- 

00 


in  o 

cm  ro 


in 

u 

hi 

in 


0) 

o 


CD  CO 

to  cm  co  cm  co  cm  cm  cm  cm 


in 


’-^JCDr'-OP-lDlD’-lDlDlDlD  CD 
CM  ■>“  CD  CO  CO  CM  CO  CO  CO  CD  CO 


tx 

< 

11. 


o 

in 


’TCMCMCMCMCMCDCMCMCMCDCMCM 


O 

LU 


(0 

(0 

(0 

10 


in 

13 

LU 


loco-^LniD  —  coinr^o-^coin  •- 

^■rrcDiDt^cocoiocococDCDCD 

CL 

o 


BlJOqiV  JO  XllSJDAIUf) 


INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO  FAR 


335 


in 

DC 

LU 

LU 

in 

X 

(- 

00 

o 

o 

O 

CO 

CO 

-r-' 

CM 

CO 

>r" 

CO 

IS) 

(D 

O 

u> 

0) 

r** 

in 

00 

o 

0) 

CO 

CM 

O 

.07 

in 

o 

in 

N 


to 

■ r - 

o 

o 

CO 

t" 

o 

o 

o 

CO 

o 

CO 

00 

ID 

0) 

10 

CM 

0) 

o 

0) 

r- 

o 

o 

CM 

in 

O 

r- 

in 

CM 

CM 

CM 

CM 

CM 

00 

in 

CM 

•"I 

CM 

O) 

CM 

CO 

CO 

T— 

h- 

CO 

CM 

y- 

r- 

CO 


in  O 

cm  co 


in 

u 

UJ 

in 


co 

O 


r-  in 

f'--'-'Ti£>t"<Ti0rococNt'~ipro  c* 

CO  CM  CO  CM  CO  CM  CM  CM  CM  O 


■’-'TlDt'-Ot'-lPlD-'-lDlDlDlD 
CM  --  CO  CO  CO  CM  CO  CO  CO  CO 


TCMCMCMCMCMCOCMCMCMCOCMCM 


iDoo'-iniD--coint'~o,'-coin 

'T^riDlDh-OOOOOOOOCOQOO) 


in 

t— ) 

f- 

CM 

DC 

< 

IX. 

O 

in 

D 

LU 

<o 

in 

(0 

D 

(0 

(0 

LU 

> 

s 

HH 

1- 

D 

Q. 

O 

cysqiv  J°  ^JisJSAiun 


5 


INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO  FAR 


336 


CO 

a 

LU 

LU 

(/) 

X 

D 

1— 

D3 

o 

CD 

O' 

CO 

O' 

T- 

co 

T“ 

CO 

u> 

CM 

^r 

o 

O' 

CO 

e'¬ 

in 

y~~ 

en 

G) 

CM 

CM 

CM 

O 

CM 

T" 

■*” 

O 

in 

d 

in 

l" 


O 

T- 

0) 

CD 

o 

in 

00 

O' 

CO 

o 

CO 

CO 

T- 

r*> 

cn 

in 

CO 

CD 

cn 

o 

00 

i*- 

r- 

in 

CD 

u> 

O 

CM 

O' 

O 

in 

o 

in 

00 

CM 

CM 

CM 

CO 

in 

CM 

"r_ 

CM 

0) 

CM 

00 

CO 

T- 

1" 

CO 

CM 

T“ 

r- 

r- 

00 


■0-  o 

CM  00 


LA 

(J 

LU 

(/) 


o 

co 


n  u> 

t^’-Trcor^^r^cooocNr-tDoo  t" 

00  CM  00  CM  00  CM  CM  --  CM  CM  0) 


l/) 


’-'TCDOO’-intDiO’-Lntoicco  in 

CN’-OO  rr  OO  00  CM  CO  CO  OO  CO  CO 


DC 

< 


o 

CO 


TTCMCMCMCMCMCOCMCMCMCOCMCM 


o 

LU 


(0 

(0 

(0 

(0 


iDco-'-iniD’-ooinr'Cn’-coin  f- 

'T'TlDlDt'COCOOOCOCOCnCnCn 

0. 

u 


ElJOqiV  J°  XjlSJOAIUfl 


s 


INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO  FAR 


337 


in 

a 

LU 

UJ 

in 

I 

13 

►— 

co 

o 

O) 

10 

CN 

10 

CO 

*T“ 

CN 

CO 

P) 

co 

CN 

p* 

in 

00 

in 

CN 

r- 

P~ 

CN 

CN 

in 

o 

LO 

in 

o 

o 

T- 

0) 

ID 

o 

in 

00 

**■” 

CO 

o 

CO 

O 

t- 

0) 

ID 

(D 

0) 

CO 

ID 

CN 

ID 

O 

ID 

C- 

p* 

r- 

0) 

CD 

ID 

T— 

in 

*r_ 

in 

CN 

CN 

CN 

CN 

CN 

00 

in 

CN 

CN 

CD 

CN 

00 

n 

-- 

n 

CN 

**- 

1" 

oo 


O 

CN  CO 


(/> 

CJ 

LU 

in 


r- 

oo 


0-  00 

(^’-’tiot'-’j-t'-cO’-cNi^OTiD  -r 

CO  CN  CO  CM  CO  CN  CN’-’---  — 


in 


’-’TiDCO’-iniDiD-riniDOiO)  O 
CN--C0  n  n  co  --  co  co  cn  cn  co 


cr 

< 


O 

W 


’3‘CNCNCNCNCNCOCNCNCNCOCNCN  Q 

LU 

co  in 

a  •  D 

A 

to  LU 


iDco'-iniD’-coinr-cn’-coin  •- 

’T'TIDIDC'OOOOOOOOOOOOOCD 

a. 

o 


BlJoqjv  jo  XlisJOAiun 


& 


SETTINGS  -  STEP  SIZES  SO  FAR  : -  7  17  -1  7  17 


338 


I/O 

DC 

LU 

LU 

LO 

X 

D 

K 

QG 

O 

03 

CO 

CM 

CD 

CD 

'r_ 

'T" 

CM 

CO 

CO 

-r~ 

o 

CM 

f- 

in 

03 

in 

CM 

r- 

r- 

CM 

CM 

in 

O 

ID 

in 

o 

o 

t- 

0) 

<s> 

o 

in 

CO 

CO 

o 

13  . 

O 

•»- 

03 

ip 

ip 

0) 

0) 

ID 

CM 

ip 

o 

<P 

r~ 

CD 

CD 

IP 

in 

TT 

C- 

LO 

CM 

CM 

CM 

CM 

CM 

00 

in 

CM 

T“ 

CM 

03 

CM 

CO 

CO 

i- 

c~ 

CO 

CM 

■*“ 

C~ 

CO 


rr  O 

CN  CD 


m 

u 

LU 

1/3 


a > 

ip 

CM  O 

("-■'-Trair-Trt'-n-'-cMf-critD  ■»- 

co  cm  co  cm  co  cm  cm  *-  ■*-  •*-  O 


on 


’-'i-tpco-'-inipiP'Tinipcno)  t- 

CM  CO  rj-  CO  CO  CO  CO  CM  CM  CM 


DC 

< 

LL. 


o 

l/) 


'7CMCMIMCMCMC0CMCMCMC0CMCM 

UJ 


(-  (0 

<  ro 

(0 

O  (0 

UJ  < 

a  uJco-^LncO’-coinh-cn-^coio 

W  'T'7CDU)C'OOCOCOCOOOa)CO<J) 


z 


a 

UJ 

IS) 

13 


3 

0. 

o 


BIJoqiv  J°  ^iisJSAiufi 


INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO  FAR 


! 

339 

0 

t 


> 

in 

on 

UJ 

UJ 

7 

in 

X 

5 

3 

1- 

no 

o 

V 

5 

i 

0) 

CO 

*- 

co 

If 

CO 

T-’ 

CM 

CO 

■*“ 

CO 

n 

i 

Li 

f) 

9 

T 

o 

CO 

r- 

in 

V 

O 

U 

0) 

in 

J 

10 

10 

; 

CM 

CM 

► 

; 

3 

7 

5 

; 

j 

0 

0) 

05 

O 

D 

o 

^p 

0 

o 

■o- 

N 


O 

T- 

05 

(O 

o 

in 

CO 

'r“ 

CO 

o 

co 

in 

in 

05 

00 

ID 

in 

co 

05 

in 

o 

r*» 

f- 

CN 

CO 

0) 

CD 

o 

CO 

r-~ 

CD 

in 

O 

CN 

CM 

CN 

CM 

CO 

in 

CM 

’r" 

CM 

0) 

CN 

00 

CO 

i— 

CO 

CN 

V 

r- 

c- 

CM 


CO 


in 

a 

LU 

in 

O 


05  CO 

IDCOCOlOlO^rrcMCMOCOCMCO  CM 
CO  CM  CO  CM  CO  CM  CM  •»“  CM  •»“  CO 


in 


OioincoOincointnoot-'CMio  cm 

CM  ■>-  CO  O’  COCO’-COCOCOCM  T 


a. 

< 


o 

in 


^tCMCMCMCMCMCOCMCMCMCOCMCM 


<0 

(0 

ID 

co 


D 

LU 

in 

3 

LU 


i£>cO’-inu>--coLnt^o)'’-coin  t- 

,TTriDlOf~CO00C00000O3a3O5 

CL 

o 


EjjaqiV  J°  XjisJSAtufi 


X 


INTERMEDIATE  SETTINGS  -  STEP  SIZES  SO 


340 


in 

DC 

LU 

LU 

<n 

I 

Z> 

H 

CO 

O 

0) 

CO 

CM 

01 

rr 

»- 

CM 

CO 

CO 

. 

j 

5 


r 

f- 

T- 

o 

co 

^r 

J 

CO 

in 

CO 

J 

ID 

ID 

) 

CM 

CM 

) 


1 

0) 

0) 

o 

CO 

o 

CO 

3 

• 

3 

"cr 

o 

■*- 

CD 

O 

LD 

T- 

\ 

CN 

6 

CM 

or— 

T 

in 

0) 

TT 

CM 

*r~ 

03 

ID 

CO 

in 

o 

in 

r- 

1 

CO 

CO 

in 

CO 

O 

CO 

■O' 

O 

V* 

in 

in 

O 

CM 

CM 

CM 

CM 

N 


00 

in 

CM 

o 

CM 

0) 

1 

T- 

*• 

CN 

co 

CO 

CO 

& 

CN 

T- 

< 

1" 

1L 

r-  ▼-  t- 

cm  co 


in 

u 

LU 

l/) 

in 

r- 


O  *T 

IDCOCOtDCD^ICOCMCMOCOCMCM  CM 
CO  CM  CO  CM  CO  CM  CM  ■«-  CM  ■*"  0) 


to 


OiDincooincoinincoC'CMCD  — 
CM--C0  CO  CO  CO  CO  CO  CM  CO 


DC 

< 


o 

in 


'J’CMCMCMCMCMCOCMCMCMCOCMCM 


c 

LU 


1C 

(C 

(0 

(0 

+1 


in 

=5 


lOco-^-incc'^coini^OT'-coin  i— 

0-'3-lDCDt'~COCOCOCOCOO)0)03 

Q. 

u 


cjjsqiV  jo  XlisJSAiun 


FINAL  SETTINGS  OBTAINED  WITH  STEP  SIZES 


341 


o 

<  r~ 

i- 

in 


UJ 

cd 

<  10 


in 


C5 

<  in 

h- 

in 


UJ 

(3 

< 

I- 

l n 


(3 

<  co 

i — 

in 


(3 

<  CM 
I- 
t n 


UJ 

( 3 
< 

I- 

(/> 

00 

UJ 

cl  o 

UJ  < 

oa  \— 
s  in 
X 

2  u. 

O 


O  O 
O  2 
2 


CM 


C0 


Q  Cl  <_> 
O  2  uj 
h  uj  in 
cl  w 

UJ 

Q. 

2  H  '-v 
UJ  K  O 
UJ  <  UJ 

a  i-  ot 

0K)w 


F-  < 
2 
X  O 
UJ  l-H 

in 


u. 

o 


* 

o 

< 

CD 

X 

< 


=3  I 
UJ  UJ 
X  > 
O  w 


s  u 
o:  in  uj 
o  a.  in 
u.  o  x, 

Hl-X 

2  in  ui 
X  > 


X 

£  >  \ 

O  <  I 
Q  -I 
2  UI  X 
<  a  uj 
o:  > 


£  X 

CL  >■  \ 

O  <  X 

U _ i 

i-i  uj  X 
2  D  uj 
X  > 


isnnisic^ncM’-ococM 
CO  CM  CO  CM  CO  CM  CM’-CM 


OioincoOinroin^fcoC'CMin 
CM’-CO  CO  CO  CO  CO  CO  CM 


'3’CMCNCMCMCMCOCMCMCMCOCMCM 


locc’-iniO’-coint^O'-coin 

Tt«g-cD(x>r-~coooooooooo)cncj) 


3*  X 
H  O  \ 
<  _J  X 
tn  u.  uj 
> 


o: 

\C  LLl 

2  CQ 
M  £ 
_l  X 


qCM'TCMOCMgcMCMCMIDCMIDIDIDOlDIDCMIDCMOCMOCMOCOOCOCOOOCMIDCMID 

olt^’-p'o|'^'^'f^'TC0  co  r-  r^coincoin’-iD’-tDioiorr  -o- 


r'-inr-cor^tnr^inin--t^-’-f-'f-in--inr--'-f~ 

r^cMh-rrh-cMC'CMCM-^-co-^cocot^inr-C'-^f^ 


C'inh'incoincoininin-^C'’-CT) 

inooincor~’-C'T-T-T-T-^f^ii) 


ioioioi£)ioto<i)ioiDcocooococo'-’-^ininininioioioi£)’--^-^-^-^'-cocococo 

O’’O’,O',T^T''T''t’''3’''3’,3’^r^t’,a’'JlDlDlDCDlD(D(Dl'-I^r'~f'-00000000000000C000C0 


0)'^0)CM’-in’-’-in»-'5TCMr^^T^IC0,3-'tC0^tCMr^M-CMC0CMrf'^-tnrtrrOC'OC0 


inooOcooa)coioiococMincocoooa)t^a)a)coo)'^C7)’-Oino)io^ina)Oint^ 

(OCOCOUO'^f-''^COC'CO-^r^CO  CMCOCMOO-'-COCMOOCMCOCDOOCMCOCDCOCMiniDCOr'' 

ooOOcM-^incMOO'-cocoooO^,T'TincoincoocorrrrcOf-cMix)OOOC'’-^T 

0’-^-ooooooooooooooooocmo-o-'--ooooO’-o 

ooooooooooooooooooooooooooooooooooo 


oo,q-OinC''3-Oina)io^-cMLncMio<oioo)cMincoinooa)coco'3-cococooOiocM 

incMcocM’-co’-ocMCMincMCMO'^-incMio^'TOcM’-coco^-LnO’-OOOinioio 

a)i-'--r-Or~-OOOOOOOOi0OO-'-O-r-O0)C0CNOc0C0OOOOO-'-C0O 

OOOOOOOOOOOOOOOOOOOOOOOOO’-O-^OOOOO-^O 


cor^coinco'-OcMCMior'in’-^TdPinincooi^iD’-cMfCMCoaj^'i-ocoOoor-cM 

CDcoc'ino<oa)oor~cr)inO'^OcocoiONinoocMcooo)incoo^T<x)iD’-inoOin 

’-fflO'icMMMOO'i^oiciOtC’-icN'finncMiDcoioffliMm’-OOOinO’- 

^OncoO'-OOOOOO’-OO’-O’-O’-OmOMO'-’-cO'-OOO’-iO'- 


a)'^-cMC~i^Ococn'^tcof-a)iniococof~cM<ooocx)CMC'Ocoo,_ 

caioOcNCOooioiDO^'^'OcoO’-coLnrfcM'iJincMCOininOC' 

■<-C0C0OCM'r-C0CMCM0)C^00C0CM0)C0C0inC~C0lDC'T-Ol0OCM 

O’-COO'^OCOCMCO’-CMCMOP-CMCO’-IOCMTJ-'O-OOO’-C'CO 


*rinf'CMt'~cot^cocoococnc7)f'-cot'~co'0-'JOininooqcoc''i 


LU 

H 

\ 

CD 

0) 

co 

0) 

ID 

•*- 

O  CM 

£ 

2 

X 

CO 

in 

O  co 

co 

CO 

O  CM 

HH 

LU 

r-~ 

in 

CM 

00 

in 

CM 

CO  t" 

t- 

Q. 

X 

o  o 

in 

LU 

CO 

in 

> 

w 

LU 

o 

X 

o 

LU  \ 

o 

O  CD 

in 

CM 

ID 

00  00 

2 

£ 

10 

r- 

T“ 

co 

t" 

r~  c- 

< 

_J 

3m; 

t— 

LU 

in 

CO 

CM 

CM  O 

O  oo 

UI 

>  X 

o 

CM 

O 

0) 

in 

ID 

CO 

h-4 

< 

LU 

■i— 

CM 

D 

DC 

> 

h- 

LU 

1- 

LU 

< 

oo  O 

a 

in 

r-x 

CO 

O 

•r- 

O 

D 

O 

co 

•sP 

o'" 

CO 

in 

in 

in 

CM 

00 

in 

LU 

Li- 

W' 

D 

o 

CO  1-  CO  CO 


cO’-'jcoooiBOcoOcoO^OciooconinOifioi 

co^-cMOP-’t^j-Tr^cMincocoinco  cm  O  co 

t-  -r-  —  T-  ■*-  CO  CM  CM 


coO--OcoOooOOcor-i£)C'r-C't-'COincocoi^cMioOCMr-coconcococMcor-0) 
SSinuocMco-inoocMcocMCMcoi-cocMincoin-coioiococoiococMioio  incoco 


if) 

in 

-J 

X 

in 

-i 

o 

o 

o 

o 

O 

o 

CM 

(D 

in 

O 

in 

^r 

CM 

o 

0) 

in 

C D 

ID 

T— 

co 

in 

00 

Tf 

n 

r- 

in 

CM 

■O' 

o 

o 

o 

n 

CO 

CM 

■>- 

CM 

'T 

CM 

in 

-J 

X 

in 

CM 

in 

ID 

0) 

in 

in 

ID 

r- 

in 

o 

in 

CM 

CM 

o 

00 

ID 

o 

in 

■O' 

cc 

c« 

r- 

O 

CD 

O 

ID 

in 

co 

CM 

O 

n 

co 

T* 

co 

CO 

00 

CM 

CM 

CM 

CM 

CM 

co 

•*- 

co 

CM 

Cm) 

CO 

CM 

CO 

ye 

X 

h* 

in 

CO 

r- 

0) 

o 

\ 

CM 

CO 

in 

CM 

X 

u. 

I 

LU 

> 

0) 

MJ- 

r- 

CM 

CM 

rf  rj-  CO  CO 
f-  0)  -r-  C- 


*  *  * 
i-cMCO'tfiniot^cocn  —  cMCO^rcocMco'*!- 


CD 

in 

CM 

r- 

r- 

r- 

ID 

ID 

0) 

ID 

r~ 

co 

O’ 

c- 

ID  O’ 

-  o 

CM 

r- 

O 

0) 

CO 

O 

r- 

▼“ 

r~ 

O 

O 

ID 

n  ■*- 

r- 

in 

CM 

CD 

CO 

CO 

in 

in 

in 

ID 

in 

in 

in 

■0- 


*  * 

CMCO^f’"CMCO,T,»~CMCO'<fCOCO’_CMCO 

ininininioixiioiO’-^’-’-’-’-c^ron 


§S?S?^§5i?§5??5555555SSSS52JSS!S555555a»« 


tojoqiv  jo  XjisjOAiufi 


834  168  1550 


. 


"  x 


LINK  FLOW  SAT  DEGREE  DISTANCE  TIME  UNIFORM  RANDOM  UNIFORM  MAX  BACK  OF  EXIT  GREEN  PERIOD 

NUMBER  FLOW  OF  SAT  TRAVELLED  SPENT  DELAY  DELAY  STOPS  QUEUE  SIGNAL  START  END 

(VEH/H)  (VEH/H)  (%)  (VEH  KM/H)  (VEH  H/H)  (VEH  H/H)  (VEH  H/H)  (VEH/SEC)  (VEH)  (SEC)  (SEC) 


342 


CD  CD 


P  P  P  P  CM 


CM 


p--cDininininp 
p  —  cd  p  p-  p  p 


CD  P  CD 


ncnnin'- 
cd  cd  cd  p  p 


cocDcnininininpppppp 


o  o  o 

CD 

CM 

CD 

CD 

P 

P 

•q- 

O  CM  o 

CM 

CM 

p  p  p 

CO 

CP 

CO 

CO 

CD 

P 

CP 

TT 

in  cm  in 

CM 

CM 

I/O 

QC 

LU 

LU 

</> 

I 

T—  P—  T— 

p 

P 

P 

0) 

0) 

O) 

O) 

p  in  cm 

in 

in 

Z) 

P 

P  P  P 

p 

CD 

P 

P 

CD 

"T 

CP 

CM  in  CD 

in 

in 

DQ 

o 

o 

I 

CM 

0) 

in 

LU 

\ 

O 

"3- 

p 

UJ 

CL 

CM 

^r 

CM 

CD  CD  (D 

•*“ 

P— 

CO 

CO 

CO 

CO 

in  in  in 

in 

in 

00 

CO 

CD 

CO  00  00 

O) 

0) 

CD 

CD 

CD 

0) 

0) 

a> 

CD  CD  CD 

CD 

CD 

a 


PCMP’-CD'-’-CMP-'-OPPPlDCM-'-lDlDCDCMOCDCDOOCMCMCDPCMlDP 


< 

2 

DC 

o 

ti¬ 

er 


X 

CD 

P 

CD 

Ul 

*— 

CO 

p 

a 

z 

00 

in 

CM 

H 

CD 

CD 

CM 

CM 

C0CDC0lD00’-CM00OCDCDlDO00  00  C0lDOCD’-inPCMPlD00CDPCDCMCD<D 
COCMPCM'-inCDPCMPCDPCMOOPP  PPCOPCOCDCOPCOCMPPOOPP 


PCM00OCD’-OCMP''-’-OOPCDCM'-OOCMCMCDOCD00CMCDCDinCDP  — 

OOO-OOOOOO-OOO’-OCOO-OOOOOOOO-OOO 

OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO 


2 

CJ 

_l 

cr 

ID  LU 

0) 

0) 

o 

< 

o 

a  id 

CO 

o 

CO 

p 

Ll. 

o  \ 

O 

•— I 

P  X 

rr 

6 

p 

P 

Z 

ID  LU 

X 

> 

CD--CDCMCMPCDPCDOOPlDCMinP<DCDlDCMCDPCDPCOCDCDPCDPCDCMlD 
Onooi^OO'iOOcJOOinfflininOO’-’-^cNCMn^O’-CNifl’-O 
cdOOcmOOOOcmOOOOcm  —  OOOOpOOOcmcdOOO’-OOO 

oboooooooooooooooooooooooooooooo 


CDCMininoocnpPOPpCDcoOOcMCMPPincD’-coiDPiniDiDincDPP 

’-CMPinCDOOCMCD-'-OCOP-'-COininPin'-CDPCOOinCMOCOOCMinCD-'- 

PCMCMPPOOCDCMCDPOOCOIDPCMOOCDPCD-'-OCDCDCDPPCOCM-'- 

ciOd’-OOOO’-O’-OO'-’-OOOOMOOO’-OOO’-tNO’-O 


2 

> 

x 

r*~ 

f- 

CP 

< 

a 

< 

X 

O 

p 

Q 

r- 

■*- 

CP 

o 

z 

LU 

X 

• 

p 

< 

Q 

LU 

CM 

o 

CM 

tt 

> 

■*” 

w 

2 

X 

_J 

Q£ 

> 

x 

r- 

CM 

If) 

< 

O 

< 

X 

in 

•r- 

p 

Ll. 

—I 

r- 

LP 

▼“ 

o 

HH 

LU 

X 

• 

p 

z 

Q 

UJ 

LD 

o 

in 

> 

r- 

r- 

CD 

ID 

CD 

in 

CO 

CM 

CM 

00 

in  O  O  cd 

p— 

O 

■r-  CM 

in 

CD  CD 

CD 

CD 

CO 

CO 

O  CM 

CM 

co 

o  o 

p— 

P- 

CD 

CM 

«r- 

CD 

■>-  LO  CD  P 

in 

CO 

—  P 

T- 

CD  p 

CD 

in 

co  in 

r- 

in 

CD 

in 

CM 

CD  CM 

O 

00 

CD 

CD 

00 

P“ 

CM 

p 

O  CD  CM  P  ■>“ 

CM 

00  P 

p 

CO 

CO 

CM  CD 

O  CD 

CO 

m 

0) 

CD  -- 

CD 

p- 

CD 

CD 

p- 

0. 
0. 
0. 
0. 
5  . 
0. 
0. 
3  . 
0. 
0. 
2  . 

0. 

0. 

7. 

0 

5. 

O 

-  o 

in 

CM 

0 

5 

0 

P“ 

O  P 

CD 

CD 

CD 

O  00 

O  P  CO  CM 

in 

co 

O  CD 

CO 

CM  CM 

O  p 

O  O  CD 

CM 

CD 

00 

O  O  CD  O 

in 

O 

o  p 

in 

P 

OlfIPM 

CD 

O  00 

p 

p  O  in 

O  P 

CD 

CN 

O  ID 

in 

“  U 

CM 

O 

CO 

<sT 

in 

CD 

CD  CD  CO  CD 

O 

in 

cd  in 

00 

CD  CM 

CD 

**“  CO 

CD 

o 

CD 

in 

cd  in 

in 

CD 

P 

in 

CD 

P"“ 

o 

CM  P 

CD 

in  co 

CD 

in 

o 

LP  CN 

in 

r- 

D 

in 

C  CM 

T“ 

in 

T~ 

CO 

P“* 

CM 

CM 

CD 

in 

CM 

_J  IU 

p  \ 

-- 

O 

<  2 

Z  X 

in 

o 

P  ►-! 

Ul 

CM 

O  P 

a.  x 

p 

LO  IU 

in 

in 

> 

CM 

CM 

UJ 

D  X 

o 

UJ  \ 

00 

in 

-1  z 

_l  2 

v 

CM 

<  < 

_J  iC 

p  p 

LU 

CM 

00 

o  i n 

>  X 

p 

p  <-* 

<  LU 

CM 

o 

cr  > 

P  W 

P 

o 

IT 

CO 

CD 

CM 


CM 

CD 


CO 

CD 


cDOintna)ininDrcDC'OOCDCDCMoocot--cococD'^cMCDOP-CDCD’-^-^;0^- 

pcDpiD-'-iDiDCDLn^-cMininiDLncDCDininpcMPPiDiDCD^cMinpcMin 


OinOcMOcMCMinooincDCMCMinpinincjcMininOcMininincDPMOOiN 

mcDCDPPinincopcoPPPcoiDcoPcncDLn-'-O'-cccDoo'crroPPPin 

inCDPPCD00C0OCDOCD00C0OCOO0>C0C0CM’-^CDOCDOlDCM~£f£!0) 

■r-  ■»"  CM  CD  P  i-  CO  ■«-  CD  ■<-  CD  •>“  CM  CDCMCD  •r-'r-’-CDPCD’-P 


CD 

00 

CD 

CD  ^ 

in 

in 

LO 

CD 

ID 

p  CD 

CD 

P 

CD  P 

00 

in 

00 

o 

o 

CD 

CN 

CD  •>- 

0) 

p 

T“ 

CO 

P 

O 

o 

CD 

CM 

CO 

in 

CD 

CM 

CO 

in 

CM 

CD 

** 

CM 

p 

CO 

CO 

CD 


t-  p  CD  •*"  CD  IP 
P  CM  O  in 


a 

00 

x 

CD 

U. 

O  tu 


CD 

* 

z 


o 

z 


IU 

CD 

X 


CD 


IX 

p 

Z 

LU 


P 

CD 


CD 

CM 


CDPCOCMPCOCD''“CMCnPCOCD,'"CMCDPCOCDCMCDPCO'£-CMCDDr''"CMCD'^°° 

sssssss»®«®®«sssssss;5;5;55SSScdcdo)cdcdcd 


z 

(0 

LU 

Ul 

p 

X 

<0 

o 

oc 

QC 

(0 

HH 

z 

< 

K 

HH 

p 

LL. 

l/) 

l/) 

o 

cjaoqiV  J°  XjisJOAiun 


CPU  TIME  USED  SO  FAR  IS  16.52  SECS 


■ 


